HairBSDF, gamma for a refracted ray

Time bar (total: 4.6s)

start0.0ms (0%)

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

analyze547.0ms (12%)

Memory
-19.7MiB live, 253.8MiB allocated; 829ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%6.3%93.7%0%0%0%0
0%0%6.3%93.7%0%0%0%1
0%0%6.3%93.7%0%0%0%2
0%0%6.3%93.7%0%0%0%3
0%0%6.3%93.7%0%0%0%4
0%0%6.3%93.7%0%0%0%5
12.5%0.8%5.5%93.7%0%0%0%6
12.5%0.8%5.5%93.7%0%0%0%7
16.7%1%4.9%93.7%0%0.4%0%8
23.7%1.4%4.4%93.7%0%0.5%0%9
26.2%1.4%3.9%93.7%0%1%0%10
33.9%1.5%3%93.7%0%1.8%0%11
38.9%1.7%2.7%93.7%0%1.9%0%12
Compiler

Compiled 42 to 28 computations (33.3% saved)

sample2.1s (45.7%)

Memory
37.8MiB live, 2 683.7MiB allocated; 458ms collecting garbage
Samples
752.0ms8 254×0valid
726.0ms8 130×0invalid
0.0ms2×1valid
Precisions
Click to see histograms. Total time spent on operations: 960.0ms
ival-sqrt: 321.0ms (33.4% of total)
ival-mult!: 220.0ms (22.9% of total)
ival-div!: 166.0ms (17.3% of total)
ival-sub!: 126.0ms (13.1% of total)
ival-asin: 124.0ms (12.9% of total)
adjust: 4.0ms (0.4% of total)
Bogosity

explain198.0ms (4.3%)

Memory
11.0MiB live, 255.7MiB allocated; 34ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
140-8(9.560361418507565e-36 -2.1230782549418843e-35 1.0492607547856861e-20)(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
00-0-eta
00-0-#s(literal 1 binary32)
00-0-(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
00-0-(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
00-0-(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
00-0-(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
00-0-(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
00-0-(*.f32 eta eta)
00-0-(*.f32 sinTheta_O sinTheta_O)
00-0-(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
00-0-sinTheta_O
00-0-h
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sqrt.f32(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))uflow-rescue60
↳(*.f32 sinTheta_O sinTheta_O)underflow272
↳(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))underflow6
↳(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))underflow136
↳(*.f32 eta eta)underflow6
Confusion
Predicted +Predicted -
+69
-0241
Precision
1.0
Recall
0.4
Confusion?
Predicted +Predicted MaybePredicted -
+609
-00241
Precision?
1.0
Recall?
0.4
Freqs
test
numberfreq
0250
16
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
86.0ms512×0valid
Compiler

Compiled 212 to 43 computations (79.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 70.0ms
ival-sqrt: 54.0ms (77% of total)
ival-mult!: 5.0ms (7.1% of total)
ival-div!: 5.0ms (7.1% of total)
ival-asin: 4.0ms (5.7% of total)
ival-sub!: 3.0ms (4.3% of total)
adjust: 0.0ms (0% of total)

preprocess75.0ms (1.6%)

Memory
-10.4MiB live, 33.2MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
053185
196185
2205185
3351185
4599185
51186185
66557185
Stop Event
1×node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶96.2%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
Symmetry

(abs sinTheta_O)

(abs eta)

Compiler

Compiled 36 to 26 computations (27.8% saved)

series31.0ms (0.7%)

Memory
34.5MiB live, 34.5MiB allocated; 0ms collecting garbage
Counts
13 → 96
Calls
Call 1
Inputs
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
h
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
(*.f32 eta eta)
eta
(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
#s(literal 1 binary32)
Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/8 (pow sinTheta_O 2)) 1/2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (pow sinTheta_O 2)) 1/8)) 1/2)))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 1))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ 1 (* -1 (pow sinTheta_O 2)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx eta #s(hole binary32 eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
Calls

9 calls:

TimeVariablePointExpression
6.0ms
sinTheta_O
@inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)
4.0ms
eta
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)
4.0ms
sinTheta_O
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)
3.0ms
sinTheta_O
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)
3.0ms
eta
@inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)

rewrite156.0ms (3.4%)

Memory
-16.1MiB live, 207.9MiB allocated; 39ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06274534
06443726
035753628
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
109 → 134
Calls
Call 1
Inputs
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
h
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
(*.f32 eta eta)
eta
(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
#s(literal 1 binary32)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/8 (pow sinTheta_O 2)) 1/2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (pow sinTheta_O 2)) 1/8)) 1/2)))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 1))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ 1 (* -1 (pow sinTheta_O 2)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx eta #s(hole binary32 eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))
h
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))
(pow.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))) (fma.f32 eta eta (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 eta eta)
(pow.f32 eta #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
eta
(*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))
(*.f32 (pow.f32 sinTheta_O #s(literal 1 binary32)) (pow.f32 sinTheta_O #s(literal 1 binary32)))
(*.f32 (neg.f32 sinTheta_O) (neg.f32 sinTheta_O))
(*.f32 (fabs.f32 sinTheta_O) (fabs.f32 sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
sinTheta_O
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (acos.f32 sinTheta_O))
(cos.f32 (asin.f32 sinTheta_O))
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32))
(*.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
(+.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
#s(literal 1 binary32)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (asin.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (fma.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 1/2 binary32) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta))))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) h) eta))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) eta)) #s(literal -1/2 binary32)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (fma.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) (*.f32 eta eta)) #s(literal 1/2 binary32) #s(literal 3/8 binary32)) eta) (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) eta))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (-.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -3/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 (fma.f32 #s(literal 3/8 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 5/16 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx sinTheta_O sinTheta_O)
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(literal 1 binary32))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 #s(literal -1/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -1/16 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/8 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(literal 1 binary32))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) (fma.f32 #s(literal -1 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 7 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) #s(literal 1/4 binary32) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32)))) #s(literal 1/4 binary32))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 eta #s(literal 4 binary32))) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 9/2 binary32)))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32)))) #s(literal 1/4 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32))))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (*.f32 eta eta) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 5 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (*.f32 h (*.f32 (fma.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) #s(literal 1/2 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))) #s(literal -1 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal -1/4 binary32))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal 1/8 binary32) (pow.f32 eta #s(literal 4 binary32))) (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 7/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal 1/4 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (*.f32 eta eta) (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (fma.f32 eta eta (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 3/8 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32))))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h))
#s(approx h h)
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32)) #s(literal 1/4 binary32) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32)) #s(literal 1/4 binary32) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32)) #s(literal 1/4 binary32) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (fma.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32)) #s(literal 1/4 binary32))) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) (*.f32 eta eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (fma.f32 (*.f32 #s(literal 1/16 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 5 binary32)) #s(literal 1/4 binary32))) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32))) (*.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))))) (*.f32 eta eta))) (*.f32 eta eta))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (* eta eta) (*.f32 eta eta))
#s(approx eta eta)
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32))) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32)) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) #s(literal 1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32))))

eval17.0ms (0.4%)

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

Compiled 5 381 to 1 039 computations (80.7% saved)

prune42.0ms (0.9%)

Memory
-34.6MiB live, 25.0MiB allocated; 8ms collecting garbage
Pruning

9 alts after pruning (9 fresh and 0 done)

PrunedKeptTotal
New1409149
Fresh000
Picked101
Done000
Total1419150
Accuracy
99.1%
Counts
150 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶96.2%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
95.9%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
91.2%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
▶96.0%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
92.1%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
▶97.2%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
▶94.8%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
80.8%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 h eta))))
▶91.6%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
Compiler

Compiled 472 to 322 computations (31.8% saved)

series93.0ms (2%)

Memory
34.0MiB live, 123.3MiB allocated; 10ms collecting garbage
Counts
39 → 172
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
(fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) eta)
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
eta
#s(literal -1/2 binary32)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
(fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))
(neg.f32 (*.f32 sinTheta_O sinTheta_O))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))))
(*.f32 eta eta)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))
(fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
#s(literal 1/2 binary32)
#s(literal 1 binary32)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (/ (* sinTheta_O sinTheta_O) eta) #s(hole binary32 (/ (pow sinTheta_O 2) eta)))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (neg (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 1))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (+ 1 (* 1/2 (pow sinTheta_O 2)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))
#s(approx (/ 1 (sin (acos sinTheta_O))) #s(hole binary32 (/ 1 (sin (acos sinTheta_O)))))
#s(approx (sin (acos sinTheta_O)) #s(hole binary32 (sin (acos sinTheta_O))))
#s(approx (acos sinTheta_O) #s(hole binary32 (acos sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) 1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* 1/2 (pow sinTheta_O 4))))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 4) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (pow sinTheta_O 2))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
Calls

9 calls:

TimeVariablePointExpression
45.0ms
sinTheta_O
@inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (/ (* sinTheta_O sinTheta_O) eta) (* sinTheta_O sinTheta_O) sinTheta_O eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (neg (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) 1/2 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
8.0ms
sinTheta_O
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (/ (* sinTheta_O sinTheta_O) eta) (* sinTheta_O sinTheta_O) sinTheta_O eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (neg (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) 1/2 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
6.0ms
sinTheta_O
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (/ (* sinTheta_O sinTheta_O) eta) (* sinTheta_O sinTheta_O) sinTheta_O eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (neg (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) 1/2 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
6.0ms
eta
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (/ (* sinTheta_O sinTheta_O) eta) (* sinTheta_O sinTheta_O) sinTheta_O eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (neg (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) 1/2 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
6.0ms
h
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (/ (* sinTheta_O sinTheta_O) eta) (* sinTheta_O sinTheta_O) sinTheta_O eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (neg (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) 1/2 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))

rewrite211.0ms (4.6%)

Memory
-33.5MiB live, 258.8MiB allocated; 43ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
010369223
010818072
059707884
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
211 → 305
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
(fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) eta)
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
eta
#s(literal -1/2 binary32)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
(fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))
(neg.f32 (*.f32 sinTheta_O sinTheta_O))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))))
(*.f32 eta eta)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))
(fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
#s(literal 1/2 binary32)
#s(literal 1 binary32)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (/ (* sinTheta_O sinTheta_O) eta) #s(hole binary32 (/ (pow sinTheta_O 2) eta)))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (neg (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 1))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (+ 1 (* 1/2 (pow sinTheta_O 2)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))
#s(approx (/ 1 (sin (acos sinTheta_O))) #s(hole binary32 (/ 1 (sin (acos sinTheta_O)))))
#s(approx (sin (acos sinTheta_O)) #s(hole binary32 (sin (acos sinTheta_O))))
#s(approx (acos sinTheta_O) #s(hole binary32 (acos sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) 1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* 1/2 (pow sinTheta_O 4))))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 4) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (pow sinTheta_O 2))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
(/.f32 (-.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (*.f32 eta eta)) (-.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))
(/.f32 (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))) (-.f32 eta (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))))
(/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(/.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32))) (fma.f32 eta eta (-.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (*.f32 eta (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))))))
(-.f32 eta (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sinTheta_O sinTheta_O) eta)))
(fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)
(fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)
(+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)
(+.f32 eta (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))
(*.f32 sinTheta_O (/.f32 sinTheta_O eta))
(/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (neg.f32 eta))
(/.f32 (*.f32 sinTheta_O sinTheta_O) eta)
(*.f32 (pow.f32 sinTheta_O #s(literal 1 binary32)) (pow.f32 sinTheta_O #s(literal 1 binary32)))
(*.f32 (neg.f32 sinTheta_O) (neg.f32 sinTheta_O))
(*.f32 (fabs.f32 sinTheta_O) (fabs.f32 sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
sinTheta_O
eta
#s(literal -1/2 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta)))))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta))))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta)))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta))))
(pow.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta))) #s(literal 1/2 binary32))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta)))
(/.f32 (-.f32 (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)) (pow.f32 eta #s(literal 4 binary32))) (-.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))) (-.f32 (*.f32 eta eta) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))
(/.f32 (+.f32 (pow.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) #s(literal 3 binary32)) (pow.f32 (*.f32 eta eta) #s(literal 3 binary32))) (fma.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)))))
(/.f32 (+.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)) (*.f32 (*.f32 eta eta) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(fma.f32 #s(literal -1 binary32) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1 binary32) (*.f32 eta eta))
(fma.f32 sinTheta_O (neg.f32 sinTheta_O) (*.f32 eta eta))
(fma.f32 eta eta (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(+.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta))
(+.f32 (*.f32 eta eta) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(*.f32 (neg.f32 sinTheta_O) sinTheta_O)
(*.f32 #s(literal -1 binary32) (*.f32 sinTheta_O sinTheta_O))
(*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1 binary32))
(*.f32 sinTheta_O (neg.f32 sinTheta_O))
(pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 2 binary32))
(neg.f32 (*.f32 sinTheta_O sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))))
(pow.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))) #s(literal 1/2 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))) (fma.f32 eta eta #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)) (*.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 eta eta)
(pow.f32 eta #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))
(*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)
(*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))
(*.f32 (*.f32 sinTheta_O sinTheta_O) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)))
(fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))
(fma.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))
(/.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))) #s(literal 1 binary32)) (-.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 1 binary32)))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 1 binary32)))))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))))
(-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
(fma.f32 (*.f32 #s(literal 1/2 binary32) sinTheta_O) sinTheta_O #s(literal 1 binary32))
(fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32))
(fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
(+.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 1 binary32))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))
#s(literal 1/2 binary32)
#s(literal 1 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)
(*.f32 h (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))))
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1/2 binary32))
(/.f32 #s(literal -1 binary32) (neg.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))
(pow.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (fma.f32 eta eta (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
(fma.f32 eta eta (*.f32 (neg.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 eta eta (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
(+.f32 (*.f32 eta eta) (*.f32 (neg.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (*.f32 eta eta) (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
(*.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) sinTheta_O) sinTheta_O)
(*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
(*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal -1 binary32))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (acos.f32 sinTheta_O))
(cos.f32 (asin.f32 sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (asin.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (asin.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (fma.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 1/2 binary32) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta))))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) h) eta))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) eta)) #s(literal -1/2 binary32)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (fma.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) (*.f32 eta eta)) #s(literal 1/2 binary32) #s(literal 3/8 binary32)) eta) (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) eta))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) eta)
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
#s(approx (/ (* sinTheta_O sinTheta_O) eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx sinTheta_O sinTheta_O)
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (-.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -3/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta)))
#s(approx (neg (* sinTheta_O sinTheta_O)) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 (fma.f32 #s(literal 3/8 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 5/16 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(literal 1 binary32))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 h eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 3 binary32))) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (/.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32) (/.f32 (*.f32 #s(literal 3/8 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 5 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (fma.f32 (/.f32 (/.f32 h (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32) (/.f32 (*.f32 #s(literal 5/16 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 7 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 eta #s(literal 3 binary32)))) #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 5 binary32)))) #s(literal 3/8 binary32) (/.f32 #s(literal 1/2 binary32) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 7 binary32)))) #s(literal 5/16 binary32) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 5 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1/2 binary32) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal 8 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (/.f32 (pow.f32 eta #s(literal -6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))) (*.f32 sinTheta_O sinTheta_O) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (/ 1 (sin (acos sinTheta_O))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (sin (acos sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
#s(approx (acos sinTheta_O) (acos.f32 sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 7 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) #s(literal 1/4 binary32) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32)))) #s(literal 1/4 binary32))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 eta #s(literal 4 binary32))) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 9/2 binary32)))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32)))) #s(literal 1/4 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (*.f32 (-.f32 (/.f32 eta (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 1/2 binary32)))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (*.f32 (+.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (*.f32 (+.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 h (/.f32 (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))))) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 h (/.f32 (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)) (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32)))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 (/.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) #s(literal -1/2 binary32) (fma.f32 (*.f32 (/.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)) (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32)))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 (/.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (fma.f32 (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) (pow.f32 sinTheta_O #s(literal 4 binary32))) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (*.f32 eta eta) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 5 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (*.f32 h (*.f32 (fma.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) #s(literal 1/2 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))) #s(literal -1 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal -1/4 binary32))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal 1/8 binary32) (pow.f32 eta #s(literal 4 binary32))) (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 7/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal 1/4 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (*.f32 eta eta) (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (fma.f32 eta eta (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 3/8 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 h (/.f32 (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))))) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 h (/.f32 (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)) (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32)))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) #s(literal -1/2 binary32) (fma.f32 (*.f32 (/.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)) (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32)))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 (/.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))
#s(approx h h)
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32)) #s(literal 1/4 binary32) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32)) #s(literal 1/4 binary32) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32)) #s(literal 1/4 binary32) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (fma.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32)) #s(literal 1/4 binary32))) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) (*.f32 eta eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (fma.f32 (*.f32 #s(literal 1/16 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 5 binary32)) #s(literal 1/4 binary32))) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32))) (*.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))))) (*.f32 eta eta))) (*.f32 eta eta))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (/.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) (*.f32 eta eta)) eta))
#s(approx eta eta)
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* eta eta) (*.f32 eta eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (*.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)) #s(literal 1/2 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32))) (*.f32 eta eta) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (/.f32 (*.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)) #s(literal 1/2 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32))) (*.f32 eta eta) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) #s(literal -1 binary32) (/.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (-.f32 (neg.f32 (*.f32 (*.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (*.f32 eta eta) (/.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (-.f32 (*.f32 (-.f32 (neg.f32 (*.f32 (*.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (*.f32 eta eta)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (*.f32 eta eta) (/.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32))) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32)) eta))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (fma.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)))) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta))))) h) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta))))) #s(literal 1 binary32)) eta))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))) #s(literal 1 binary32)) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)))) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 1 binary32)) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)))) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (*.f32 (neg.f32 eta) (-.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) #s(literal 1 binary32))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)))) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta))))) h) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)))) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta))))) #s(literal 1 binary32)) eta)))

eval41.0ms (0.9%)

Memory
4.5MiB live, 92.2MiB allocated; 8ms collecting garbage
Compiler

Compiled 16 968 to 2 296 computations (86.5% saved)

prune18.0ms (0.4%)

Memory
-5.1MiB live, 39.4MiB allocated; 5ms collecting garbage
Pruning

13 alts after pruning (10 fresh and 3 done)

PrunedKeptTotal
New3738381
Fresh224
Picked235
Done000
Total37713390
Accuracy
99.5%
Counts
390 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
24.0%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
✓96.2%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
▶95.9%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
91.2%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
✓96.0%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
▶92.1%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
▶97.6%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta))))
78.9%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
✓94.8%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
91.6%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
87.9%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
▶87.9%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)))
▶94.2%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
Compiler

Compiled 775 to 480 computations (38.1% saved)

series42.0ms (0.9%)

Memory
32.4MiB live, 83.7MiB allocated; 10ms collecting garbage
Counts
34 → 150
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta))
(fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta)
(*.f32 sinTheta_O (/.f32 sinTheta_O eta))
sinTheta_O
(/.f32 sinTheta_O eta)
eta
#s(literal -1/2 binary32)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h))
(*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
(/.f32 #s(literal 1 binary32) eta)
#s(literal 1 binary32)
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
(*.f32 eta eta)
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h))
(*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)
(sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
(pow.f32 eta #s(literal -2 binary32))
#s(literal -2 binary32)
Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* sinTheta_O (/ sinTheta_O eta)) #s(hole binary32 (/ (pow sinTheta_O 2) eta)))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (/ sinTheta_O eta) #s(hole binary32 (/ sinTheta_O eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 eta) #s(hole binary32 (/ 1 eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (pow eta -2) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
Calls

9 calls:

TimeVariablePointExpression
11.0ms
h
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 eta) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow eta -2) -2)
4.0ms
eta
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 eta) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow eta -2) -2)
4.0ms
sinTheta_O
@inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 eta) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow eta -2) -2)
3.0ms
eta
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 eta) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow eta -2) -2)
3.0ms
sinTheta_O
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 eta) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow eta -2) -2)

rewrite225.0ms (4.9%)

Memory
12.5MiB live, 244.2MiB allocated; 22ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
09918800
010167666
057397478
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
184 → 229
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta))
(fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta)
(*.f32 sinTheta_O (/.f32 sinTheta_O eta))
sinTheta_O
(/.f32 sinTheta_O eta)
eta
#s(literal -1/2 binary32)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h))
(*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
(/.f32 #s(literal 1 binary32) eta)
#s(literal 1 binary32)
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
(*.f32 eta eta)
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h))
(*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)
(sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
(pow.f32 eta #s(literal -2 binary32))
#s(literal -2 binary32)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* sinTheta_O (/ sinTheta_O eta)) #s(hole binary32 (/ (pow sinTheta_O 2) eta)))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (/ sinTheta_O eta) #s(hole binary32 (/ sinTheta_O eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 eta) #s(hole binary32 (/ 1 eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (pow eta -2) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta))
(/.f32 (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))) (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))))
(/.f32 (-.f32 (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (*.f32 eta eta)) (-.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))
(/.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32))) (fma.f32 eta eta (-.f32 (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (*.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))))))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (fma.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))))
(-.f32 eta (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)))
(fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta)
(fma.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)
(fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)
(+.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta)
(+.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))
(*.f32 (/.f32 sinTheta_O eta) sinTheta_O)
(*.f32 sinTheta_O (/.f32 sinTheta_O eta))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 eta))
(/.f32 (*.f32 sinTheta_O sinTheta_O) eta)
sinTheta_O
(/.f32 (neg.f32 sinTheta_O) (neg.f32 eta))
(/.f32 sinTheta_O eta)
eta
#s(literal -1/2 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h))
(*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)
(*.f32 h #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
(/.f32 #s(literal -1 binary32) (neg.f32 eta))
(/.f32 #s(literal 1 binary32) eta)
(pow.f32 eta #s(literal -1 binary32))
#s(literal 1 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))
(pow.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)) #s(literal 1/2 binary32))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 eta eta)
(pow.f32 eta #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(pow.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))) (fma.f32 eta eta #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(*.f32 (pow.f32 sinTheta_O #s(literal 1 binary32)) (pow.f32 sinTheta_O #s(literal 1 binary32)))
(*.f32 (neg.f32 sinTheta_O) (neg.f32 sinTheta_O))
(*.f32 (fabs.f32 sinTheta_O) (fabs.f32 sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h))
(*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)
(*.f32 h (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))))
(sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
(pow.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))) #s(literal 1/2 binary32))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
(*.f32 (/.f32 #s(literal 1 binary32) eta) (/.f32 #s(literal 1 binary32) eta))
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 eta eta)))
(/.f32 #s(literal 1 binary32) (*.f32 eta eta))
(pow.f32 (*.f32 eta eta) #s(literal -1 binary32))
(pow.f32 eta #s(literal -2 binary32))
(exp.f32 (*.f32 (log.f32 eta) #s(literal -2 binary32)))
#s(literal -2 binary32)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (asin.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (fma.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 1/2 binary32) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta))))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) h) eta))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) eta)) #s(literal -1/2 binary32)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (fma.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) (*.f32 eta eta)) #s(literal 1/2 binary32) #s(literal 3/8 binary32)) eta) (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) eta))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) eta)
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta))
#s(approx (* sinTheta_O (/ sinTheta_O eta)) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O))
#s(approx sinTheta_O sinTheta_O)
#s(approx (/ sinTheta_O eta) (/.f32 sinTheta_O eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 h eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (fma.f32 (/.f32 (/.f32 h (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32) (*.f32 (/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 5 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (-.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -3/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 (fma.f32 #s(literal 3/8 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 5/16 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (+.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (+.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 8 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) (/.f32 (pow.f32 eta #s(literal -6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))) (*.f32 sinTheta_O sinTheta_O) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 7 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) #s(literal 1/4 binary32) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32)))) #s(literal 1/4 binary32))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 eta #s(literal 4 binary32))) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 9/2 binary32)))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32)))) #s(literal 1/4 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (-.f32 (/.f32 eta (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (fma.f32 (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 6 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (*.f32 eta eta) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 5 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (*.f32 h (*.f32 (fma.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) #s(literal 1/2 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))) #s(literal -1 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal -1/4 binary32))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal 1/8 binary32) (pow.f32 eta #s(literal 4 binary32))) (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 7/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal 1/4 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (*.f32 eta eta) (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (fma.f32 eta eta (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 3/8 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))
#s(approx h h)
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32)) #s(literal 1/4 binary32) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32)) #s(literal 1/4 binary32) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32)) #s(literal 1/4 binary32) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (fma.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32)) #s(literal 1/4 binary32))) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) (*.f32 eta eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (fma.f32 (*.f32 #s(literal 1/16 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 5 binary32)) #s(literal 1/4 binary32))) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32))) (*.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))))) (*.f32 eta eta))) (*.f32 eta eta))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (/.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) (*.f32 eta eta)) eta))
#s(approx eta eta)
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (*.f32 eta eta) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (*.f32 eta eta) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (/ 1 eta) (/.f32 #s(literal 1 binary32) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (* eta eta) (*.f32 eta eta))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) #s(literal -1 binary32) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (-.f32 (neg.f32 (*.f32 (*.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (*.f32 eta eta) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (-.f32 (*.f32 (-.f32 (neg.f32 (*.f32 (*.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (*.f32 eta eta)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (*.f32 eta eta) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (pow eta -2) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32))) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32)) eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) h) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) #s(literal 1 binary32)) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 eta eta)) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 1 binary32)) (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 1 binary32)) (fma.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -1 binary32) (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) (*.f32 eta eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (neg.f32 eta) (-.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) #s(literal 1 binary32))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) h) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) #s(literal 1 binary32)) eta)))

eval38.0ms (0.8%)

Memory
-8.0MiB live, 38.6MiB allocated; 2ms collecting garbage
Compiler

Compiled 12 473 to 1 553 computations (87.5% saved)

prune26.0ms (0.6%)

Memory
-27.9MiB live, 19.6MiB allocated; 1ms collecting garbage
Pruning

13 alts after pruning (6 fresh and 7 done)

PrunedKeptTotal
New2572259
Fresh145
Picked145
Done033
Total25913272
Accuracy
99.5%
Counts
272 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶24.0%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
✓96.2%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
✓95.9%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
✓96.0%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
✓92.1%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
▶87.7%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))))))
▶97.6%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
78.9%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
✓94.8%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
▶91.6%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
▶87.9%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
✓87.9%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)))
✓94.2%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
Compiler

Compiled 635 to 392 computations (38.3% saved)

series146.0ms (3.2%)

Memory
15.2MiB live, 112.9MiB allocated; 10ms collecting garbage
Counts
43 → 272
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))
(fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)
sinTheta_O
(*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32))
(/.f32 sinTheta_O eta)
eta
#s(literal -1/2 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(/.f32 (PI.f32) #s(literal 2 binary32))
(PI.f32)
#s(literal 2 binary32)
(acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))
#s(literal 1 binary32)
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
(*.f32 eta eta)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(log.f32 eta)
Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 eta))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (* (/ sinTheta_O eta) -1/2) #s(hole binary32 (* -1/2 (/ sinTheta_O eta))))
#s(approx (/ sinTheta_O eta) #s(hole binary32 (/ sinTheta_O eta)))
#s(approx (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) #s(hole binary32 (- (* 1/2 (PI)) (acos (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))))
#s(approx (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (acos (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (pow eta 3))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))) (* 1/2 (/ 1 (pow eta 3))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2)))))))) (* 1/2 (* eta (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ 1 (pow eta 3))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (pow eta 4)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6)))) (/ 1 (pow eta 4)))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (+ (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))))) (/ 1 (pow eta 6))))) (/ 1 (pow eta 4)))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 1))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* 1/2 (pow sinTheta_O 2)))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2)))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/8 (pow sinTheta_O 2)) 1/2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (pow sinTheta_O 2)) 1/8)) 1/2)))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 1))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ 1 (* -1 (pow sinTheta_O 2)))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (sqrt (/ (sqrt -1) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))) (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1)))))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2)))) (/ 1 (sqrt -1))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))) (pow sinTheta_O 2))) (+ (/ 1 (sqrt -1)) (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))) (pow sinTheta_O 3))) (+ (/ 1 (sqrt -1)) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (pow (sqrt -1) 3)))) (+ (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))) (/ (pow eta 4) (* (pow sinTheta_O 2) (pow (sqrt -1) 3))))))) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (sqrt -1) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* 1/2 (* (sqrt (/ (sqrt -1) (pow sinTheta_O 5))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1 (/ (+ (* -1/2 (* (sqrt (* sinTheta_O (sqrt -1))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (* 1/2 (* (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))))) (pow sinTheta_O 3))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (+ (/ 1/2 (* sinTheta_O (pow (sqrt -1) 3))) (/ (pow eta 4) (* sinTheta_O (pow (sqrt -1) 3)))) (/ (pow eta 2) (pow (sqrt -1) 2))) sinTheta_O)) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 4)))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (* sinTheta_O (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) sinTheta_O)) (/ (pow eta 2) (pow (sqrt -1) 2))) sinTheta_O)) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sqrt -1) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (+ (* (/ (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2)))) (/ 1 (pow sinTheta_O 2))) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (+ (* (pow eta 2) (- (/ (* (pow eta 2) (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow sinTheta_O 4)) (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))))) (/ 1 (pow sinTheta_O 2))) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (exp (* (log eta) 2)) #s(hole binary32 (pow eta 2)))
#s(approx (* (log eta) 2) #s(hole binary32 (* 2 (log eta))))
#s(approx (log eta) #s(hole binary32 (log eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 6))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (+ (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (* (log eta) 2) #s(hole binary32 (* -2 (log (/ 1 eta)))))
#s(approx (log eta) #s(hole binary32 (* -1 (log (/ 1 eta)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 6))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (* (log eta) 2) #s(hole binary32 (* 2 (+ (log -1) (* -1 (log (/ -1 eta)))))))
#s(approx (log eta) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 eta))))))
Calls

9 calls:

TimeVariablePointExpression
56.0ms
eta
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) sinTheta_O (* (/ sinTheta_O eta) -1/2) (/ sinTheta_O eta) eta -1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta))
37.0ms
eta
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) sinTheta_O (* (/ sinTheta_O eta) -1/2) (/ sinTheta_O eta) eta -1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta))
12.0ms
eta
@inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) sinTheta_O (* (/ sinTheta_O eta) -1/2) (/ sinTheta_O eta) eta -1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta))
10.0ms
sinTheta_O
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) sinTheta_O (* (/ sinTheta_O eta) -1/2) (/ sinTheta_O eta) eta -1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta))
6.0ms
sinTheta_O
@inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) sinTheta_O (* (/ sinTheta_O eta) -1/2) (/ sinTheta_O eta) eta -1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta))

rewrite258.0ms (5.6%)

Memory
29.8MiB live, 357.1MiB allocated; 65ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0137415426
0141912516
1795612334
0808312010
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
315 → 407
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))
(fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)
sinTheta_O
(*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32))
(/.f32 sinTheta_O eta)
eta
#s(literal -1/2 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(/.f32 (PI.f32) #s(literal 2 binary32))
(PI.f32)
#s(literal 2 binary32)
(acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))
#s(literal 1 binary32)
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
(*.f32 eta eta)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(log.f32 eta)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 eta))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (* (/ sinTheta_O eta) -1/2) #s(hole binary32 (* -1/2 (/ sinTheta_O eta))))
#s(approx (/ sinTheta_O eta) #s(hole binary32 (/ sinTheta_O eta)))
#s(approx (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) #s(hole binary32 (- (* 1/2 (PI)) (acos (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))))
#s(approx (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (acos (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (pow eta 3))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))) (* 1/2 (/ 1 (pow eta 3))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2)))))))) (* 1/2 (* eta (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ 1 (pow eta 3))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (pow eta 4)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6)))) (/ 1 (pow eta 4)))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (+ (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))))) (/ 1 (pow eta 6))))) (/ 1 (pow eta 4)))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 1))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* 1/2 (pow sinTheta_O 2)))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2)))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/8 (pow sinTheta_O 2)) 1/2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (pow sinTheta_O 2)) 1/8)) 1/2)))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 1))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ 1 (* -1 (pow sinTheta_O 2)))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (sqrt (/ (sqrt -1) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))) (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1)))))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2)))) (/ 1 (sqrt -1))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))) (pow sinTheta_O 2))) (+ (/ 1 (sqrt -1)) (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))) (pow sinTheta_O 3))) (+ (/ 1 (sqrt -1)) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (pow (sqrt -1) 3)))) (+ (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))) (/ (pow eta 4) (* (pow sinTheta_O 2) (pow (sqrt -1) 3))))))) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (sqrt -1) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* 1/2 (* (sqrt (/ (sqrt -1) (pow sinTheta_O 5))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1 (/ (+ (* -1/2 (* (sqrt (* sinTheta_O (sqrt -1))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (* 1/2 (* (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))))) (pow sinTheta_O 3))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (+ (/ 1/2 (* sinTheta_O (pow (sqrt -1) 3))) (/ (pow eta 4) (* sinTheta_O (pow (sqrt -1) 3)))) (/ (pow eta 2) (pow (sqrt -1) 2))) sinTheta_O)) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 4)))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (* sinTheta_O (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) sinTheta_O)) (/ (pow eta 2) (pow (sqrt -1) 2))) sinTheta_O)) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sqrt -1) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (+ (* (/ (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2)))) (/ 1 (pow sinTheta_O 2))) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (+ (* (pow eta 2) (- (/ (* (pow eta 2) (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow sinTheta_O 4)) (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))))) (/ 1 (pow sinTheta_O 2))) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (exp (* (log eta) 2)) #s(hole binary32 (pow eta 2)))
#s(approx (* (log eta) 2) #s(hole binary32 (* 2 (log eta))))
#s(approx (log eta) #s(hole binary32 (log eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 6))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (+ (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (* (log eta) 2) #s(hole binary32 (* -2 (log (/ 1 eta)))))
#s(approx (log eta) #s(hole binary32 (* -1 (log (/ 1 eta)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 6))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (* (log eta) 2) #s(hole binary32 (* 2 (+ (log -1) (* -1 (log (/ -1 eta)))))))
#s(approx (log eta) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 eta))))))
Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta))
(/.f32 (-.f32 (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O)) (*.f32 eta eta)) (-.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) eta))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (fma.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) eta))))
(fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta)
(fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta)
(fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)
(+.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) eta)
(+.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O))
sinTheta_O
(*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32))
(*.f32 #s(literal -1/2 binary32) (/.f32 sinTheta_O eta))
(/.f32 (*.f32 sinTheta_O #s(literal -1/2 binary32)) eta)
(/.f32 (*.f32 #s(literal -1/2 binary32) sinTheta_O) eta)
(/.f32 (neg.f32 sinTheta_O) (neg.f32 eta))
(/.f32 sinTheta_O eta)
eta
#s(literal -1/2 binary32)
(/.f32 (-.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (*.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))) (+.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) #s(literal 3 binary32))) (fma.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32)) (fma.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 (neg.f32 (PI.f32)) #s(literal -2 binary32))
(/.f32 (PI.f32) #s(literal 2 binary32))
(PI.f32)
#s(literal 2 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)
(*.f32 h (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))))
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))))
(/.f32 #s(literal 1 binary32) (sqrt.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))))
(pow.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))) #s(literal 1/2 binary32))
(/.f32 #s(literal -1 binary32) (neg.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))
(pow.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)) #s(literal -1 binary32))
#s(literal 1 binary32)
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)))
(*.f32 eta eta)
(pow.f32 (exp.f32 (log.f32 eta)) #s(literal 2 binary32))
(pow.f32 eta #s(literal 2 binary32))
(+.f32 (cosh.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)
(*.f32 h (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32))
(/.f32 #s(literal -1 binary32) (neg.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
(pow.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))) #s(literal -1 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))) (fma.f32 eta eta (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))))
(-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 eta eta (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 eta eta (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(+.f32 (*.f32 eta eta) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (*.f32 eta eta) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) sinTheta_O) sinTheta_O)
(*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))
(*.f32 (*.f32 sinTheta_O sinTheta_O) (cosh.f32 (atanh.f32 sinTheta_O)))
(/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32))
(pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal -1 binary32))
(cosh.f32 (neg.f32 (atanh.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(cosh.f32 (atanh.f32 (neg.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 (fabs.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 sinTheta_O))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (acos.f32 sinTheta_O))
(cos.f32 (asin.f32 sinTheta_O))
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32))
(*.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
(+.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(*.f32 (pow.f32 sinTheta_O #s(literal 1 binary32)) (pow.f32 sinTheta_O #s(literal 1 binary32)))
(*.f32 (neg.f32 sinTheta_O) (neg.f32 sinTheta_O))
(*.f32 (fabs.f32 sinTheta_O) (fabs.f32 sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(+.f32 (cosh.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))
(pow.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)) #s(literal 1/2 binary32))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)))
(*.f32 eta eta)
(pow.f32 (exp.f32 (log.f32 eta)) #s(literal 2 binary32))
(pow.f32 eta #s(literal 2 binary32))
(+.f32 (cosh.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(log.f32 (*.f32 eta eta))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(*.f32 #s(literal 2 binary32) (log.f32 eta))
(+.f32 (log.f32 eta) (log.f32 eta))
(log.f32 eta)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (asin.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (fma.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 1/2 binary32) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta))))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) h) eta))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) eta)) #s(literal -1/2 binary32)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (fma.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) (*.f32 eta eta)) #s(literal 1/2 binary32) #s(literal 3/8 binary32)) eta) (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) eta))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) eta)
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
#s(approx sinTheta_O sinTheta_O)
#s(approx (* (/ sinTheta_O eta) -1/2) (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)))
#s(approx (/ sinTheta_O eta) (/.f32 sinTheta_O eta))
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (-.f32 (*.f32 (PI.f32) #s(literal 1/2 binary32)) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))))
#s(approx (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 h eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (fma.f32 (/.f32 (/.f32 h (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32) (*.f32 (/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32) (*.f32 (/.f32 (pow.f32 eta #s(literal -3 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 5 binary32))))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (/.f32 (pow.f32 eta #s(literal -3 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (+.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (+.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 8 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) (/.f32 (pow.f32 eta #s(literal -6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))) (*.f32 sinTheta_O sinTheta_O) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 h eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (fma.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 1/2 binary32) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta))))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) h) eta))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta (*.f32 sinTheta_O sinTheta_O)) (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (pow.f32 eta #s(literal -3 binary32)))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta (*.f32 sinTheta_O sinTheta_O)) (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (fma.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 1/2 binary32) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta))))) (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) eta))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal -3 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (fma.f32 (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -6 binary32)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -3/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (fma.f32 (fma.f32 #s(literal 3/8 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 5/16 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(literal 1 binary32))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 #s(literal 3/8 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (fma.f32 #s(literal 5/16 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(literal 1 binary32))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 #s(literal -1/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -1/16 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/8 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(literal 1 binary32))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) (fma.f32 #s(literal -1 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (-.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -3/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 7 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) #s(literal 1/4 binary32) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32)))) #s(literal 1/4 binary32))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 eta #s(literal 4 binary32))) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 9/2 binary32)))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32)))) #s(literal 1/4 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (*.f32 (-.f32 (/.f32 eta (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (fma.f32 (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 6 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 7 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) #s(literal 1/4 binary32) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 #s(literal -1/2 binary32) (fma.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 eta eta))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32))))) (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 #s(literal -1/2 binary32) (fma.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 7 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) #s(literal 1/4 binary32) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 eta eta))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 #s(literal -1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (neg.f32 (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) #s(literal -1 binary32))) (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (neg.f32 (/.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 sinTheta_O sinTheta_O))) (+.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (neg.f32 (/.f32 (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 sinTheta_O #s(literal 3 binary32)))) (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))) #s(literal 1/2 binary32) (+.f32 (/.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) (*.f32 sinTheta_O sinTheta_O))) (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32))))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 5 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal 1/2 binary32) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (*.f32 h (*.f32 (fma.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) #s(literal 1/2 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))) #s(literal -1 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal -1/4 binary32))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal 1/8 binary32) (pow.f32 eta #s(literal 4 binary32))) (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 7/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal 1/4 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 4 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 5 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal 1/2 binary32) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (*.f32 h (*.f32 (fma.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) #s(literal 1/2 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))) #s(literal -1 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) (*.f32 (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 5 binary32)))) (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))))) #s(literal 1/2 binary32))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (fma.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 eta eta)) #s(literal -1/2 binary32) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) (fma.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 (*.f32 #s(literal -1/2 binary32) (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))))) (pow.f32 sinTheta_O #s(literal 3 binary32))))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) #s(literal -1 binary32)) (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (/.f32 (+.f32 #s(literal 1/2 binary32) (pow.f32 eta #s(literal 4 binary32))) (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) (/.f32 (*.f32 eta eta) #s(literal -1 binary32))) sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (-.f32 (fma.f32 (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) (/.f32 #s(literal 1/2 binary32) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O)) (/.f32 (*.f32 eta eta) #s(literal -1 binary32))) sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (*.f32 eta eta) (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (fma.f32 eta eta (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 3/8 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32))))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (*.f32 eta eta) (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (fma.f32 eta eta (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 3/8 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))
#s(approx h h)
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))))) h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32)) #s(literal 1/4 binary32))) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))))) (*.f32 eta eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (fma.f32 (*.f32 #s(literal 1/16 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 5 binary32)) #s(literal 1/4 binary32))) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32))) (*.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))))) (*.f32 eta eta))) (*.f32 eta eta))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (/.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) (*.f32 eta eta)) eta))
#s(approx eta eta)
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (*.f32 eta eta) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (*.f32 eta eta) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) #s(literal -1 binary32) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (-.f32 (neg.f32 (*.f32 (*.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (*.f32 eta eta) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (-.f32 (*.f32 (-.f32 (neg.f32 (*.f32 (*.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (*.f32 eta eta)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (*.f32 eta eta) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))))
#s(approx (exp (* (log eta) 2)) (*.f32 eta eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 sinTheta_O (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (sqrt.f32 #s(literal -1 binary32)))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O (/.f32 (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 sinTheta_O (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (sqrt.f32 #s(literal -1 binary32)))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 eta eta) (neg.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (-.f32 (fma.f32 (*.f32 (*.f32 eta eta) (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O))) (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 sinTheta_O #s(literal -2 binary32))) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 eta eta) (neg.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (-.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 eta eta) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (*.f32 eta eta) (neg.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (exp (* (log eta) 2)) (*.f32 eta eta))
#s(approx (* (log eta) 2) (*.f32 (log.f32 eta) #s(literal 2 binary32)))
#s(approx (log eta) (log.f32 eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32)) eta))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32))) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) #s(literal 1 binary32)) eta))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 1 binary32)) (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 1 binary32)) (fma.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -1 binary32) (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1 binary32)) (neg.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) #s(literal 1 binary32)) (*.f32 #s(literal -1 binary32) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (* (log eta) 2) (*.f32 (neg.f32 (log.f32 eta)) #s(literal -2 binary32)))
#s(approx (log eta) (neg.f32 (neg.f32 (log.f32 eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (*.f32 (neg.f32 eta) (-.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) #s(literal 1 binary32))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) #s(literal 1 binary32)) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) #s(literal 1 binary32)) eta)))
#s(approx (* (log eta) 2) (*.f32 (fma.f32 (log.f32 (/.f32 #s(literal -1 binary32) eta)) #s(literal -1 binary32) (log.f32 #s(literal -1 binary32))) #s(literal 2 binary32)))
#s(approx (log eta) (fma.f32 (log.f32 (/.f32 #s(literal -1 binary32) eta)) #s(literal -1 binary32) (log.f32 #s(literal -1 binary32))))

eval79.0ms (1.7%)

Memory
-26.5MiB live, 111.7MiB allocated; 9ms collecting garbage
Compiler

Compiled 23 482 to 2 884 computations (87.7% saved)

prune55.0ms (1.2%)

Memory
-6.3MiB live, 45.5MiB allocated; 4ms collecting garbage
Pruning

16 alts after pruning (5 fresh and 11 done)

PrunedKeptTotal
New4374441
Fresh011
Picked145
Done077
Total43816454
Accuracy
99.5%
Counts
454 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
24.1%
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) #s(literal 3 binary32))) (fma.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32)) (fma.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))))
23.5%
(/.f32 (-.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (*.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))) (+.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))
✓24.0%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
✓96.2%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
✓95.9%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
✓96.0%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
✓92.1%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
✓87.7%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))))))
✓97.6%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
78.9%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
✓94.8%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
91.6%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 #s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))) (*.f32 sinTheta_O sinTheta_O))))) h)))
91.3%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) #s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
✓87.9%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
✓87.9%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)))
✓94.2%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
Compiler

Compiled 1 521 to 508 computations (66.6% saved)

regimes73.0ms (1.6%)

Memory
-5.7MiB live, 182.6MiB allocated; 13ms collecting garbage
Counts
24 → 1
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) #s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 #s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 #s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 h eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(/.f32 (-.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (*.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))) (+.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) #s(literal 3 binary32))) (fma.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32)) (fma.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))))
Outputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
Calls

10 calls:

9.0ms
sinTheta_O
8.0ms
(*.f32 eta eta)
8.0ms
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
6.0ms
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
6.0ms
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
Results
AccuracySegmentsBranch
97.6%1(*.f32 sinTheta_O sinTheta_O)
97.6%1(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
97.6%1(*.f32 eta eta)
97.6%1(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
97.6%1(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
97.6%1(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
97.6%1(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
97.6%1sinTheta_O
97.6%1h
97.6%1eta
Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes20.0ms (0.4%)

Memory
28.8MiB live, 75.9MiB allocated; 1ms collecting garbage
Accuracy

Total -23.3b remaining (-1402.8%)

Threshold costs -23.3b (-1402.8%)

Counts
5 → 1
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
Outputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
Calls

10 calls:

3.0ms
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
2.0ms
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
2.0ms
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
2.0ms
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
2.0ms
eta
Results
AccuracySegmentsBranch
94.8%1(*.f32 sinTheta_O sinTheta_O)
94.8%1(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
94.8%1(*.f32 eta eta)
94.8%1(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
94.8%1(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
94.8%1(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
94.8%1sinTheta_O
94.8%1h
94.8%1eta
94.8%1(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
Compiler

Compiled 83 to 71 computations (14.5% saved)

derivations38.0ms (0.8%)

Memory
-10.9MiB live, 83.8MiB allocated; 3ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 47 to 21 computations (55.3% saved)

preprocess47.0ms (1%)

Memory
-18.7MiB live, 44.7MiB allocated; 68ms collecting garbage
Remove

(abs eta)

(abs sinTheta_O)

Compiler

Compiled 318 to 196 computations (38.4% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...