HairBSDF, gamma for a refracted ray

Time bar (total: 4.2s)

start0.0ms (0%)

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

analyze283.0ms (6.8%)

Memory
-15.2MiB live, 457.5MiB allocated; 88ms 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.0s (48.2%)

Memory
75.2MiB live, 3 273.4MiB allocated; 461ms collecting garbage
Samples
842.0ms8 254×0valid
700.0ms8 305×0invalid
0.0ms2×1valid
Precisions
Click to see histograms. Total time spent on operations: 1.0s
ival-sqrt: 266.0ms (25.9% of total)
ival-mult!: 233.0ms (22.7% of total)
ival-div!: 232.0ms (22.6% of total)
ival-asin: 208.0ms (20.2% of total)
ival-sub!: 85.0ms (8.3% of total)
adjust: 4.0ms (0.4% of total)
Bogosity

explain221.0ms (5.3%)

Memory
26.6MiB live, 355.0MiB allocated; 108ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
270-11(3.780474139827792e-25 -9.374265309025383e-34 2.8188911734484614e-21)(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-rescue160
↳(*.f32 sinTheta_O sinTheta_O)underflow292
↳(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))underflow16
↳(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))underflow146
↳(*.f32 eta eta)underflow16
Confusion
Predicted +Predicted -
+1611
-0229
Precision
1.0
Recall
0.5925925925925926
Confusion?
Predicted +Predicted MaybePredicted -
+16011
-00229
Precision?
1.0
Recall?
0.5925925925925926
Freqs
test
numberfreq
0240
116
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
46.0ms512×0valid
Compiler

Compiled 212 to 43 computations (79.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 23.0ms
ival-sqrt: 7.0ms (30.7% of total)
ival-mult!: 5.0ms (21.9% of total)
ival-div!: 5.0ms (21.9% of total)
ival-asin: 4.0ms (17.6% of total)
ival-sub!: 3.0ms (13.2% of total)
adjust: 0.0ms (0% of total)

preprocess67.0ms (1.6%)

Memory
-35.6MiB live, 58.4MiB allocated; 14ms 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
▶91.9%
(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
9.6MiB live, 57.0MiB allocated; 2ms 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
5.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
@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)
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)))))) (- (* 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)

rewrite135.0ms (3.2%)

Memory
40.7MiB live, 178.9MiB allocated; 16ms 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 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
(/.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 (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 #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 (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))))

eval22.0ms (0.5%)

Memory
-3.3MiB live, 42.5MiB allocated; 7ms collecting garbage
Compiler

Compiled 5 072 to 1 037 computations (79.6% saved)

prune11.0ms (0.3%)

Memory
-29.4MiB live, 17.3MiB allocated; 6ms collecting garbage
Pruning

9 alts after pruning (9 fresh and 0 done)

PrunedKeptTotal
New1229131
Fresh000
Picked101
Done000
Total1239132
Accuracy
99.0%
Counts
132 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
24.5%
(-.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))))))))
91.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))))))
▶86.8%
(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))))))))
▶91.9%
(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)))))))
91.9%
(asin.f32 (/.f32 h (sqrt.f32 #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))))))
88.5%
(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 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
▶95.5%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
▶87.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) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
Compiler

Compiled 464 to 322 computations (30.6% saved)

series188.0ms (4.5%)

Memory
17.4MiB live, 228.8MiB allocated; 119ms collecting garbage
Counts
42 → 250
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 #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))))
#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 eta eta)
(*.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)
(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 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)))))))
(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 (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)))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(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))))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O 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 (* (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 (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (+ (* (/ (* 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 (* (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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (* (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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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
115.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 (/ 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) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)))
18.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) 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 (/ 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) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)))
11.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) 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 (/ 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) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)))
10.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 (/ 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) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O 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 (/ 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) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)))

rewrite213.0ms (5.1%)

Memory
-19.6MiB live, 268.0MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0116013247
0121511292
0633011012
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
292 → 406
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 #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))))
#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 eta eta)
(*.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)
(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 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)))))))
(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 (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)))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(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))))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O 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 (* (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 (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (+ (* (/ (* 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 (* (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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (* (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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta))))
(/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta)))
h
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta))
(-.f32 eta (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta))))
(/.f32 (-.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)) (*.f32 eta eta)) (-.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))
(/.f32 (-.f32 (*.f32 eta eta) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta))) (-.f32 eta (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)))
(/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))))
(/.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) #s(literal 3 binary32))) (fma.f32 eta eta (-.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)) (*.f32 eta (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)))))
(fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta)
(fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta)
(+.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)
(+.f32 eta (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta))
(*.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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.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 (*.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 (*.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)))))
(/.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)))))
(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 (exp.f32 (log.f32 eta)) (exp.f32 (log.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 #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))
#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 (-.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)))))))
(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 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)) (*.f32 (neg.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.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 (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 (/.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)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))
(pow.f32 (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1/2 binary32))
(-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))))) (fma.f32 eta eta (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (*.f32 eta eta) (*.f32 sinTheta_O (/.f32 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 (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(literal 2 binary32)
(*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 (neg.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)))
(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 #s(literal 1 binary32) (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.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) (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 (neg.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 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)) (*.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))))
(fma.f32 (neg.f32 sinTheta_O) sinTheta_O #s(literal 1 binary32))
(fma.f32 #s(literal -1 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
(fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1 binary32) #s(literal 1 binary32))
(fma.f32 sinTheta_O (neg.f32 sinTheta_O) #s(literal 1 binary32))
(+.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) #s(literal 1 binary32))
(+.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
#s(approx (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta))
#s(approx (/ (* sinTheta_O sinTheta_O) eta) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)))
#s(approx (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx sinTheta_O sinTheta_O)
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (sin (acos sinTheta_O)) #s(literal 1 binary32))
#s(approx (sin (acos sinTheta_O)) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))
#s(approx (sin (acos 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 (sin (acos 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)) (-.f32 #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 (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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) #s(literal -1/2 binary32)) eta))
#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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (sin (acos sinTheta_O)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (sin (acos 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 (sin (acos 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 (sin (acos 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)) (*.f32 (neg.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (sin (acos sinTheta_O)) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sin (acos 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 (sin (acos 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 (sin (acos 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) (*.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 (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 (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (exp (* (log eta) 2)) (*.f32 eta eta))
#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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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)) (/.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.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 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.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))))))) (/.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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)) (/.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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (*.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 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.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 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta))))) #s(literal 1 binary32)) 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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))))

eval40.0ms (1%)

Memory
-9.0MiB live, 83.0MiB allocated; 6ms collecting garbage
Compiler

Compiled 15 159 to 2 445 computations (83.9% saved)

prune10.0ms (0.3%)

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

13 alts after pruning (11 fresh and 2 done)

PrunedKeptTotal
New3269335
Fresh224
Picked325
Done000
Total33113344
Accuracy
99.6%
Counts
344 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
28.0%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta)))))
27.8%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
91.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))))))
▶86.8%
(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 sinTheta_O sinTheta_O))))))
✓91.9%
(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)))))))
▶88.5%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
91.9%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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)))))))
▶98.2%
(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))))
✓95.5%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
87.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) #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))))))) h)))
▶84.4%
(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)))
84.5%
(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.9%
(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 782 to 513 computations (34.4% saved)

series75.0ms (1.8%)

Memory
-18.8MiB live, 123.6MiB allocated; 15ms collecting garbage
Counts
37 → 225
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 #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(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
(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 sinTheta_O sinTheta_O))))))
(/.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 sinTheta_O sinTheta_O)))))
(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 sinTheta_O sinTheta_O))))
(-.f32 (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(log.f32 eta)
#s(literal 2 binary32)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O 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 #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 (/ 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 (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 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 (/ 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (- (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (* 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 (- (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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
22.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 (/ 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))) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))
13.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 (/ 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))) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))
10.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 (/ 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))) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))
4.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 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 (/ 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))) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))
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 (/ 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))) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))

rewrite253.0ms (6%)

Memory
25.8MiB live, 258.4MiB allocated; 33ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0109112827
0112110948
0594910677
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
262 → 319
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 #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(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
(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 sinTheta_O sinTheta_O))))))
(/.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 sinTheta_O sinTheta_O)))))
(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 sinTheta_O sinTheta_O))))
(-.f32 (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(log.f32 eta)
#s(literal 2 binary32)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O 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 #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 (/ 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 (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 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 (/ 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (- (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (* 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 (- (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 eta (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)))
(/.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))))
(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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 #s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 h (sqrt.f32 #s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))
(sqrt.f32 #s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))
(pow.f32 #s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)) #s(literal 1/2 binary32))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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)))
(-.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(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
(-.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 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(/.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 (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(literal 2 binary32)
#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)))
#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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 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 (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 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))) (/.f32 (neg.f32 (*.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 (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (exp (* (log eta) 2)) (*.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 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O 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 (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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)) (/.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (* 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 (/ 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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)) (/.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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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)))
#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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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))))

eval37.0ms (0.9%)

Memory
-31.3MiB live, 65.0MiB allocated; 14ms collecting garbage
Compiler

Compiled 11 915 to 1 691 computations (85.8% saved)

prune8.0ms (0.2%)

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

13 alts after pruning (7 fresh and 6 done)

PrunedKeptTotal
New2272229
Fresh156
Picked145
Done022
Total22913242
Accuracy
99.6%
Counts
242 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
28.0%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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)))))
▶27.8%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
▶91.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.9%
(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)))))))
✓88.5%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
▶84.1%
(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)))))))
▶91.9%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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)))))))
✓98.2%
(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))))
✓95.5%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
87.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) #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))))))) h)))
✓84.4%
(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)))
▶84.5%
(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.9%
(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 651 to 430 computations (33.9% saved)

series64.0ms (1.5%)

Memory
21.3MiB live, 158.4MiB allocated; 9ms collecting garbage
Counts
41 → 213
Calls
Call 1
Inputs
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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)))))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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))))))
h
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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 (+ (* 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)))
(*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta))
(fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1 binary32) #s(literal 1 binary32))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
(*.f32 eta eta)
eta
#s(literal -1 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 #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)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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))))) (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)
(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))
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 (+ (* 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 (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) #s(hole binary32 (pow eta 2)))
#s(approx (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(hole binary32 1))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(hole binary32 (+ 1 (* -1 (/ (pow sinTheta_O 2) (pow eta 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (* eta eta)) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 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 (- (* 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 (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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) (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 (/ 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 (+ (* 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) (* eta eta)) -1) 1) (* eta eta)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) 1))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (pow eta 2)))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow eta 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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) (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 (/ 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 (* (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (pow sinTheta_O 2))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(hole binary32 (/ (+ (* -1 (pow sinTheta_O 2)) (pow eta 2)) (pow eta 2))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#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 (pow eta -2) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (- (* 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 (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) #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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (* (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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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
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)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (/ (* sinTheta_O sinTheta_O) (* eta eta)) (* sinTheta_O sinTheta_O) sinTheta_O (* eta eta) eta -1 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)))) (pow eta -2) -2 (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* 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))))) (exp (* (log eta) 2)) (* (log eta) 2) (log 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)))))
11.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) (neg (* sinTheta_O sinTheta_O))) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (/ (* sinTheta_O sinTheta_O) (* eta eta)) (* sinTheta_O sinTheta_O) sinTheta_O (* eta eta) eta -1 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)))) (pow eta -2) -2 (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* 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))))) (exp (* (log eta) 2)) (* (log eta) 2) (log 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)))))
10.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) (neg (* sinTheta_O sinTheta_O))) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (/ (* sinTheta_O sinTheta_O) (* eta eta)) (* sinTheta_O sinTheta_O) sinTheta_O (* eta eta) eta -1 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)))) (pow eta -2) -2 (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* 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))))) (exp (* (log eta) 2)) (* (log eta) 2) (log 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)))))
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) (neg (* sinTheta_O sinTheta_O))) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (/ (* sinTheta_O sinTheta_O) (* eta eta)) (* sinTheta_O sinTheta_O) sinTheta_O (* eta eta) eta -1 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)))) (pow eta -2) -2 (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* 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))))) (exp (* (log eta) 2)) (* (log eta) 2) (log 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)))))
3.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)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (/ (* sinTheta_O sinTheta_O) (* eta eta)) (* sinTheta_O sinTheta_O) sinTheta_O (* eta eta) eta -1 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)))) (pow eta -2) -2 (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* 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))))) (exp (* (log eta) 2)) (* (log eta) 2) (log 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)))))

rewrite232.0ms (5.5%)

Memory
-9.3MiB live, 231.2MiB allocated; 19ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0108112472
0111610677
0597510398
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
254 → 321
Calls
Call 1
Inputs
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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)))))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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))))))
h
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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 (+ (* 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)))
(*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta))
(fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1 binary32) #s(literal 1 binary32))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
(*.f32 eta eta)
eta
#s(literal -1 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 #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)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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))))) (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)
(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))
#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 (+ (* 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 (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) #s(hole binary32 (pow eta 2)))
#s(approx (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(hole binary32 1))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(hole binary32 (+ 1 (* -1 (/ (pow sinTheta_O 2) (pow eta 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (* eta eta)) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 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 (- (* 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 (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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) (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 (/ 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 (+ (* 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) (* eta eta)) -1) 1) (* eta eta)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) 1))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (pow eta 2)))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow eta 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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) (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 (/ 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 (* (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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) (neg (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (pow sinTheta_O 2))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(hole binary32 (/ (+ (* -1 (pow sinTheta_O 2)) (pow eta 2)) (pow eta 2))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#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 (pow eta -2) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (- (* 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 (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) #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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (* (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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (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 (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta))))))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.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))))) #s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta))))))
h
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))))
(pow.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))) #s(literal 1/2 binary32))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
(*.f32 (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) eta) eta)
(*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta))
(*.f32 (*.f32 eta eta) (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)))
(fma.f32 (*.f32 eta eta) #s(literal 1 binary32) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta))))
(fma.f32 #s(literal 1 binary32) (*.f32 eta eta) (*.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) (*.f32 eta eta)))
(+.f32 (*.f32 (*.f32 eta eta) #s(literal 1 binary32)) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta))))
(+.f32 (*.f32 #s(literal 1 binary32) (*.f32 eta eta)) (*.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) (*.f32 eta eta)))
(-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)))) (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta))))
(/.f32 (-.f32 (*.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta))) #s(literal 1 binary32)) (-.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) #s(literal 1 binary32)))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta))))))
(/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) #s(literal 1 binary32)))))
(fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32))
(fma.f32 #s(literal -1 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal 1 binary32))
(+.f32 (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)) #s(literal 1 binary32))
(+.f32 #s(literal 1 binary32) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)))
(*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta))
(*.f32 sinTheta_O (/.f32 sinTheta_O (*.f32 eta eta)))
(/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (neg.f32 (*.f32 eta eta)))
(/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta 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
(*.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)))
eta
#s(literal -1 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 #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)
(-.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 (*.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)))))))
(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 (/.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)
(-.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 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(/.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))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O 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 (- (* 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 #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 (+ (* 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 (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) (*.f32 eta eta))
#s(approx (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta)))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) #s(literal 1 binary32))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)))
#s(approx (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))
#s(approx (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx sinTheta_O 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) (*.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 (/ 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 (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 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))))
#s(approx (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (*.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) (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 (/ 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 (+ (* 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) (* eta eta)) -1) 1) (* eta eta)) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
#s(approx (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) (*.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) (* eta eta)) -1) 1) (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 eta #s(literal -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 #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) (*.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 (/.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) (*.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 #s(literal -1/2 binary32) (/.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)) (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 (*.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)) (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 (*.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)) (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 (/ 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) (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 (/ 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 (* (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 #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) (*.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 (/.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) (*.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 #s(literal -1/2 binary32) (/.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)) (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 (*.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)) (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 (*.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)) (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 (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 (/ (* 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 (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 (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 #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 (*.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 (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (/.f32 (fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta)) (*.f32 eta eta)))
#s(approx (exp (* (log eta) 2)) (*.f32 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)))) (*.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)))) (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)))) (*.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))) (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 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 (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 #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 (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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) 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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) 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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) h) eta))
#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 (/.f32 (*.f32 sinTheta_O sinTheta_O) 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 #s(literal -1/2 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (/.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 (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 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)))))) 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 (*.f32 sinTheta_O sinTheta_O) eta) eta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (* (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1) 1) (* eta eta)) (*.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) 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 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) 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 (/.f32 (*.f32 sinTheta_O sinTheta_O) 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 (/.f32 (*.f32 sinTheta_O sinTheta_O) 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 #s(literal 1 binary32) (-.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))) (/.f32 (*.f32 (neg.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 (*.f32 (neg.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))))))) (/.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) 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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) 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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) h) eta))
#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 (/.f32 (*.f32 sinTheta_O sinTheta_O) 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 #s(literal -1/2 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (/.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 (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 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)))))) 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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) 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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) 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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) 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 #s(literal -1/2 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) 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 #s(literal -1/2 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (/.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 (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 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(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 (/.f32 (*.f32 sinTheta_O sinTheta_O) 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 (/.f32 (*.f32 sinTheta_O sinTheta_O) 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 (/ 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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) 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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) 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 #s(literal 1/2 binary32) (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) 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 #s(literal -1/2 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) 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 #s(literal -1/2 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (/.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 (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 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(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))))

eval68.0ms (1.6%)

Memory
-22.8MiB live, 67.2MiB allocated; 7ms collecting garbage
Compiler

Compiled 13 454 to 1 957 computations (85.5% saved)

prune11.0ms (0.3%)

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

14 alts after pruning (3 fresh and 11 done)

PrunedKeptTotal
New2561257
Fresh022
Picked055
Done066
Total25614270
Accuracy
99.6%
Counts
270 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
28.0%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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)))))
✓27.8%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
✓91.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.9%
(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)))))))
✓88.5%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
✓84.1%
(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)))))))
✓91.9%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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)))))))
✓98.2%
(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))))
✓95.5%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
87.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) #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))))))) h)))
✓84.4%
(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)))
✓84.5%
(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.9%
(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)))
97.4%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* 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 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta))))
Compiler

Compiled 1 157 to 475 computations (58.9% saved)

regimes74.0ms (1.8%)

Memory
11.6MiB live, 147.5MiB allocated; 32ms collecting garbage
Counts
22 → 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)))
(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 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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)))
(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 #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 (/.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 sinTheta_O sinTheta_O))))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) eta)))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 #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))) (fma.f32 eta eta (/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) h)))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #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)))))))
(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))))))) #s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (/.f32 (*.f32 h (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32) h) 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) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(-.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 (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))))))))
(asin.f32 (/.f32 h (sqrt.f32 #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))))))
Outputs
(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))))
Calls

10 calls:

17.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))))))))
11.0ms
(*.f32 eta eta)
8.0ms
eta
6.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
(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
98.2%1(*.f32 sinTheta_O sinTheta_O)
98.2%1(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
98.2%1(*.f32 eta eta)
98.2%1(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
98.2%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))))))
98.2%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)))))))
98.2%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))))))))
98.2%1sinTheta_O
98.2%1h
98.2%1eta
Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes46.0ms (1.1%)

Memory
0.7MiB live, 80.1MiB allocated; 28ms collecting garbage
Accuracy

Total -23.5b remaining (-1650.5%)

Threshold costs -23.5b (-1650.5%)

Counts
7 → 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)))
(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 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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)))
(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)))))))
Outputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
Calls

10 calls:

17.0ms
h
11.0ms
(*.f32 eta eta)
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
(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 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)))))))
Results
AccuracySegmentsBranch
95.5%1(*.f32 sinTheta_O sinTheta_O)
95.5%1(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
95.5%1(*.f32 eta eta)
95.5%1(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
95.5%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))))))
95.5%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)))))))
95.5%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))))))))
95.5%1sinTheta_O
95.5%1h
95.5%1eta
Compiler

Compiled 83 to 71 computations (14.5% saved)

derivations64.0ms (1.5%)

Memory
-32.6MiB live, 74.7MiB allocated; 47ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 47 to 21 computations (55.3% saved)

preprocess15.0ms (0.4%)

Memory
43.6MiB live, 43.5MiB allocated; 0ms 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...