HairBSDF, gamma for a refracted ray

Time bar (total: 4.7s)

start0.0ms (0%)

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

analyze267.0ms (5.7%)

Memory
-12.4MiB live, 565.7MiB allocated; 43ms 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.3s (49.7%)

Memory
52.7MiB live, 4 662.9MiB allocated; 674ms collecting garbage
Samples
927.0ms8 256×0valid
845.0ms8 080×0invalid
Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-sqrt: 401.0ms (35.9% of total)
ival-div!: 251.0ms (22.5% of total)
ival-mult!: 202.0ms (18.1% of total)
ival-asin: 156.0ms (14% of total)
ival-sub!: 101.0ms (9% of total)
adjust: 8.0ms (0.7% of total)
Bogosity

explain157.0ms (3.4%)

Memory
26.1MiB live, 746.3MiB allocated; 20ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
220-6(8.607232987177678e-26 1.505880799096019e-36 1.1195641194383394e-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))))))
10-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-eta
00-0-#s(literal 1 binary32)
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)underflow296
↳(-.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))))underflow148
↳(*.f32 eta eta)underflow16
-.f32(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))cancellation10
Confusion
Predicted +Predicted -
+166
-1233
Precision
0.9411764705882353
Recall
0.7272727272727273
Confusion?
Predicted +Predicted MaybePredicted -
+1606
-10233
Precision?
0.9411764705882353
Recall?
0.7272727272727273
Freqs
test
numberfreq
0239
117
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
45.0ms512×0valid
Compiler

Compiled 212 to 43 computations (79.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 27.0ms
ival-sqrt: 8.0ms (30.1% of total)
ival-div!: 6.0ms (22.6% of total)
ival-mult!: 5.0ms (18.8% of total)
ival-asin: 5.0ms (18.8% of total)
ival-sub!: 3.0ms (11.3% of total)
adjust: 0.0ms (0% of total)

preprocess212.0ms (4.5%)

Memory
-5.2MiB live, 276.9MiB allocated; 23ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
053185
196185
2205185
3351185
4599185
51186185
66557185
01318
02218
13618
28018
316218
427118
551618
6298618
7686718
0871018
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
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))))))))
Outputs
(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 18 to 13 computations (27.8% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶92.8%
(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))))))))
Compiler

Compiled 18 to 13 computations (27.8% saved)

series39.0ms (0.8%)

Memory
22.0MiB live, 67.3MiB allocated; 7ms 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
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)))))) (- (* 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)
8.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)
5.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
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)
3.0ms
eta
@inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)

rewrite137.0ms (2.9%)

Memory
-31.5MiB live, 206.0MiB allocated; 26ms 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
9.8MiB live, 62.6MiB allocated; 4ms collecting garbage
Compiler

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

prune7.0ms (0.2%)

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

9 alts after pruning (9 fresh and 0 done)

PrunedKeptTotal
New1409149
Fresh000
Picked101
Done000
Total1419150
Accuracy
99.5%
Counts
150 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶92.8%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))))))))
92.7%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
▶87.7%
(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))))))))
▶92.7%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
92.7%
(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.2%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
▶97.1%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
▶94.8%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
90.1%
(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 490 to 334 computations (31.8% saved)

series104.0ms (2.2%)

Memory
10.4MiB live, 336.5MiB allocated; 26ms collecting garbage
Counts
39 → 185
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
(fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) eta)
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
eta
#s(literal -1/2 binary32)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
(fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))
(neg.f32 (*.f32 sinTheta_O sinTheta_O))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))))
(*.f32 eta eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) #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 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
(fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
#s(literal 1 binary32)
(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 (/ (* 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/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 1))
#s(approx (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (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 (- 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 (/ (* 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/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* -1/2 (pow sinTheta_O 2))))
#s(approx (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1/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 (- (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 (- 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 (- (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 (/ 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 (- (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 (* 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 (/ 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 (/ 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
50.0ms
eta
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (/ (* sinTheta_O sinTheta_O) eta) (* sinTheta_O sinTheta_O) sinTheta_O eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (neg (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) 1 (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)))
17.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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) 1 (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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) 1 (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)))
6.0ms
sinTheta_O
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (/ (* sinTheta_O sinTheta_O) eta) (* sinTheta_O sinTheta_O) sinTheta_O eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (neg (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) 1 (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)))
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) sinTheta_O eta -1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (neg (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) 1 (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)))

rewrite155.0ms (3.3%)

Memory
-42.5MiB live, 294.3MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07859090
08327473
040357293
Stop Event
1×iter limit
1×iter limit
1×node limit
1×iter limit
Counts
224 → 322
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
(fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) eta)
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
eta
#s(literal -1/2 binary32)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
(fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))
(neg.f32 (*.f32 sinTheta_O sinTheta_O))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))))
(*.f32 eta eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) #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 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
(fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
#s(literal 1 binary32)
(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 (/ (* 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/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 1))
#s(approx (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (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 (- 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 (/ (* 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/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* -1/2 (pow sinTheta_O 2))))
#s(approx (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1/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 (- (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 (- 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 (- (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 (/ 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 (- (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 (* 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 (/ 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 (/ 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 (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)) (pow.f32 eta #s(literal 4 binary32))) (-.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))) (-.f32 (*.f32 eta eta) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))
(/.f32 (+.f32 (pow.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) #s(literal 3 binary32)) (pow.f32 (*.f32 eta eta) #s(literal 3 binary32))) (fma.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 eta eta)))))
(/.f32 (+.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 (*.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)) (*.f32 (*.f32 eta eta) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(fma.f32 (neg.f32 sinTheta_O) sinTheta_O (*.f32 eta eta))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(fma.f32 (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))
(neg.f32 (*.f32 sinTheta_O sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32))))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32))))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32))))))
(pow.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32))))) #s(literal 1/2 binary32))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))))) (fma.f32 eta eta (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32))))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32))))))))
(*.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 sinTheta_O (/.f32 sinTheta_O #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))))
(/.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O) (neg.f32 #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))
(-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))
(/.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 1 binary32)))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))))))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 1 binary32)))))
(fma.f32 (*.f32 #s(literal -1/2 binary32) sinTheta_O) sinTheta_O #s(literal 1 binary32))
(fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32))
(fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
(+.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 1 binary32))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
#s(literal 1 binary32)
(-.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))))))
(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 (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 (- (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ (* 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 (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(literal 1 binary32))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 #s(literal -1/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -1/16 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/8 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) #s(literal 1 binary32))
#s(approx (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))
#s(approx (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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ (* 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/2 (* sinTheta_O sinTheta_O)) 1) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (+ (* -1/2 (* sinTheta_O sinTheta_O)) 1) (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (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 #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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (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) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O sinTheta_O))) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (exp (* (log eta) 2)) (*.f32 eta eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (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 #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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (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) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (exp (* (log eta) 2)) (*.f32 eta eta))
#s(approx (* (log eta) 2) (*.f32 (log.f32 eta) #s(literal 2 binary32)))
#s(approx (log eta) (log.f32 eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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))))

eval38.0ms (0.8%)

Memory
12.1MiB live, 106.4MiB allocated; 9ms collecting garbage
Compiler

Compiled 10 899 to 1 846 computations (83.1% saved)

prune16.0ms (0.3%)

Memory
8.9MiB live, 55.9MiB allocated; 3ms collecting garbage
Pruning

12 alts after pruning (8 fresh and 4 done)

PrunedKeptTotal
New3215326
Fresh134
Picked145
Done000
Total32312335
Accuracy
99.7%
Counts
335 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶24.7%
(-.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))))
✓92.8%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))))))))
▶92.7%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
87.5%
(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 #s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(literal 1 binary32))))))))
✓92.7%
(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.2%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
92.6%
(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)))))))
✓97.1%
(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))))
▶97.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))))
▶74.6%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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)))))))
✓94.8%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
▶90.1%
(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 630 to 403 computations (36% saved)

series141.0ms (3%)

Memory
25.1MiB live, 246.3MiB allocated; 100ms collecting garbage
Counts
51 → 256
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)
(-.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 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))))
(*.f32 eta eta)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))
(fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
#s(literal 1/2 binary32)
(*.f32 sinTheta_O sinTheta_O)
#s(literal 1 binary32)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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 (/.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 (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)))
(pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) #s(literal 3 binary32))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)
(*.f32 (*.f32 sinTheta_O 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 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 eta eta) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))
(*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)
Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* sinTheta_O (/ 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 (- (/ (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 (- (* 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 (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 1))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (+ 1 (* 1/2 (pow sinTheta_O 2)))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (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 (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 eta))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (pow eta 3)))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (+ (* -1/8 (/ (pow sinTheta_O 6) (pow eta 3))) (pow eta 3))))
#s(approx (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) #s(hole binary32 (* -1/8 (/ (pow sinTheta_O 6) (pow eta 3)))))
#s(approx (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (* (* sinTheta_O sinTheta_O) -1/2) #s(hole binary32 (* -1/2 (pow sinTheta_O 2))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (pow eta 2)))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (+ (* 1/2 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ (pow sinTheta_O 2) (pow eta 2))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (+ (* 1/2 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta) #s(hole binary32 (* -1/2 (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 (/ 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* 1/2 (pow sinTheta_O 4))))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 4) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (* -1 (/ (+ (* -2 (pow eta 3)) (* 2 (pow eta 3))) (pow sinTheta_O 4))) (+ (* -1 (/ eta (pow sinTheta_O 2))) (* 1/2 (/ 1 eta)))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (* 2 (/ (* (pow eta 2) (+ (* -2 (pow eta 3)) (* 2 (pow eta 3)))) (pow sinTheta_O 6))) (+ (* -2 (/ (pow eta 3) (pow sinTheta_O 4))) (+ (* -1 (/ eta (pow sinTheta_O 2))) (+ (* 2 (/ (pow eta 3) (pow sinTheta_O 4))) (* 1/2 (/ 1 eta)))))))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (* -1/8 (/ (pow sinTheta_O 6) (pow eta 3)))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (* (pow sinTheta_O 6) (- (/ (pow eta 3) (pow sinTheta_O 6)) (* 1/8 (/ 1 (pow eta 3)))))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (* 1/4 (/ (pow sinTheta_O 4) (pow eta 2)))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (* (pow sinTheta_O 4) (+ (* 1/4 (/ 1 (pow eta 2))) (* 1/2 (/ 1 (pow sinTheta_O 2)))))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (* (pow sinTheta_O 4) (+ (* 1/4 (/ 1 (pow eta 2))) (+ (* 1/2 (/ 1 (pow sinTheta_O 2))) (/ (pow eta 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1/2 (/ (pow eta 2) (pow sinTheta_O 2))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (/ 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (/ 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (/ 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 (- (* 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 (* (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 (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (/ (+ (* -1/8 (pow sinTheta_O 6)) (pow eta 6)) (pow eta 3))))
#s(approx (pow eta 3) #s(hole binary32 (pow eta 3)))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (/ (+ (* 1/4 (pow sinTheta_O 4)) (* 1/2 (* (pow eta 2) (pow sinTheta_O 2)))) (pow eta 2))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (/ (+ (* 1/4 (pow sinTheta_O 4)) (* (pow eta 2) (- (pow eta 2) (* -1/2 (pow sinTheta_O 2))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (- (pow eta 2) (* -1/2 (pow sinTheta_O 2)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ 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 (- (* 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 (* (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 (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* eta (- (+ 1 (* -1 (/ (+ (* -1/4 (pow sinTheta_O 4)) (* 1/4 (pow sinTheta_O 4))) (pow eta 4)))) (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* eta (- (+ 1 (* 1/2 (/ (* (pow sinTheta_O 2) (+ (* -1/4 (pow sinTheta_O 4)) (* 1/4 (pow sinTheta_O 4)))) (pow eta 6)))) (+ (* -1/4 (/ (pow sinTheta_O 4) (pow eta 4))) (+ (* 1/4 (/ (pow sinTheta_O 4) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (* (pow eta 3) (+ 1 (* -1/8 (/ (pow sinTheta_O 6) (pow eta 6)))))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (* (pow eta 2) (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (* (pow eta 2) (- (+ 1 (* 1/4 (/ (pow sinTheta_O 4) (pow eta 4)))) (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (* (pow eta 2) (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (/ 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 (* (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 (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* -1 (* eta (- (* -1 (/ (+ (* -1/4 (pow sinTheta_O 4)) (* 1/4 (pow sinTheta_O 4))) (pow eta 4))) (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (* (pow sinTheta_O 2) (+ (* -1/4 (pow sinTheta_O 4)) (* 1/4 (pow sinTheta_O 4)))) (pow eta 6))) (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2))) (+ (* -1/4 (/ (pow sinTheta_O 4) (pow eta 4))) (* 1/4 (/ (pow sinTheta_O 4) (pow eta 4)))))))))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (* -1 (* (pow eta 3) (- (* 1/8 (/ (pow sinTheta_O 6) (pow eta 6))) 1)))))
Calls

9 calls:

TimeVariablePointExpression
29.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 (- (/ (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))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) 1/2 (* sinTheta_O sinTheta_O) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (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)))))) (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (* (* sinTheta_O sinTheta_O) -1/2) 3 (pow eta 3) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))
21.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 (- (/ (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))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) 1/2 (* sinTheta_O sinTheta_O) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (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)))))) (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (* (* sinTheta_O sinTheta_O) -1/2) 3 (pow eta 3) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))
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 eta) eta -1/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))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) 1/2 (* sinTheta_O sinTheta_O) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (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)))))) (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (* (* sinTheta_O sinTheta_O) -1/2) 3 (pow eta 3) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))
12.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 (- (/ (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))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) 1/2 (* sinTheta_O sinTheta_O) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (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)))))) (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (* (* sinTheta_O sinTheta_O) -1/2) 3 (pow eta 3) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))
12.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 (- (/ (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))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) 1/2 (* sinTheta_O sinTheta_O) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (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)))))) (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (* (* sinTheta_O sinTheta_O) -1/2) 3 (pow eta 3) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))

rewrite257.0ms (5.5%)

Memory
13.0MiB live, 441.7MiB allocated; 59ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0124114420
0130611894
1693211310
0838411010
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
307 → 478
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)
(-.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 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))))
(*.f32 eta eta)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))
(fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
#s(literal 1/2 binary32)
(*.f32 sinTheta_O sinTheta_O)
#s(literal 1 binary32)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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 (/.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 (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)))
(pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) #s(literal 3 binary32))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)
(*.f32 (*.f32 sinTheta_O 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 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 eta eta) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))
(*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* sinTheta_O (/ 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 (- (/ (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 (- (* 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 (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 1))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (+ 1 (* 1/2 (pow sinTheta_O 2)))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (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 (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 eta))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (pow eta 3)))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (+ (* -1/8 (/ (pow sinTheta_O 6) (pow eta 3))) (pow eta 3))))
#s(approx (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) #s(hole binary32 (* -1/8 (/ (pow sinTheta_O 6) (pow eta 3)))))
#s(approx (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (* (* sinTheta_O sinTheta_O) -1/2) #s(hole binary32 (* -1/2 (pow sinTheta_O 2))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (pow eta 2)))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (+ (* 1/2 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ (pow sinTheta_O 2) (pow eta 2))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (+ (* 1/2 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta) #s(hole binary32 (* -1/2 (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 (/ 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* 1/2 (pow sinTheta_O 4))))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 4) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (* -1 (/ (+ (* -2 (pow eta 3)) (* 2 (pow eta 3))) (pow sinTheta_O 4))) (+ (* -1 (/ eta (pow sinTheta_O 2))) (* 1/2 (/ 1 eta)))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (* 2 (/ (* (pow eta 2) (+ (* -2 (pow eta 3)) (* 2 (pow eta 3)))) (pow sinTheta_O 6))) (+ (* -2 (/ (pow eta 3) (pow sinTheta_O 4))) (+ (* -1 (/ eta (pow sinTheta_O 2))) (+ (* 2 (/ (pow eta 3) (pow sinTheta_O 4))) (* 1/2 (/ 1 eta)))))))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (* -1/8 (/ (pow sinTheta_O 6) (pow eta 3)))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (* (pow sinTheta_O 6) (- (/ (pow eta 3) (pow sinTheta_O 6)) (* 1/8 (/ 1 (pow eta 3)))))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (* 1/4 (/ (pow sinTheta_O 4) (pow eta 2)))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (* (pow sinTheta_O 4) (+ (* 1/4 (/ 1 (pow eta 2))) (* 1/2 (/ 1 (pow sinTheta_O 2)))))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (* (pow sinTheta_O 4) (+ (* 1/4 (/ 1 (pow eta 2))) (+ (* 1/2 (/ 1 (pow sinTheta_O 2))) (/ (pow eta 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1/2 (/ (pow eta 2) (pow sinTheta_O 2))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (/ 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (/ 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (/ 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 (- (* 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 (* (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 (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (/ (+ (* -1/8 (pow sinTheta_O 6)) (pow eta 6)) (pow eta 3))))
#s(approx (pow eta 3) #s(hole binary32 (pow eta 3)))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (/ (+ (* 1/4 (pow sinTheta_O 4)) (* 1/2 (* (pow eta 2) (pow sinTheta_O 2)))) (pow eta 2))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (/ (+ (* 1/4 (pow sinTheta_O 4)) (* (pow eta 2) (- (pow eta 2) (* -1/2 (pow sinTheta_O 2))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (- (pow eta 2) (* -1/2 (pow sinTheta_O 2)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ 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 (- (* 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 (* (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 (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* eta (- (+ 1 (* -1 (/ (+ (* -1/4 (pow sinTheta_O 4)) (* 1/4 (pow sinTheta_O 4))) (pow eta 4)))) (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* eta (- (+ 1 (* 1/2 (/ (* (pow sinTheta_O 2) (+ (* -1/4 (pow sinTheta_O 4)) (* 1/4 (pow sinTheta_O 4)))) (pow eta 6)))) (+ (* -1/4 (/ (pow sinTheta_O 4) (pow eta 4))) (+ (* 1/4 (/ (pow sinTheta_O 4) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (* (pow eta 3) (+ 1 (* -1/8 (/ (pow sinTheta_O 6) (pow eta 6)))))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (* (pow eta 2) (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) #s(hole binary32 (* (pow eta 2) (- (+ 1 (* 1/4 (/ (pow sinTheta_O 4) (pow eta 4)))) (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) #s(hole binary32 (* (pow eta 2) (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (/ 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 (* (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 (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* -1 (* eta (- (* -1 (/ (+ (* -1/4 (pow sinTheta_O 4)) (* 1/4 (pow sinTheta_O 4))) (pow eta 4))) (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))))
#s(approx (/ (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)))) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (* (pow sinTheta_O 2) (+ (* -1/4 (pow sinTheta_O 4)) (* 1/4 (pow sinTheta_O 4)))) (pow eta 6))) (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2))) (+ (* -1/4 (/ (pow sinTheta_O 4) (pow eta 4))) (* 1/4 (/ (pow sinTheta_O 4) (pow eta 4)))))))))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) #s(hole binary32 (* -1 (* (pow eta 3) (- (* 1/8 (/ (pow sinTheta_O 6) (pow eta 6))) 1)))))
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) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 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 2 binary32)) (*.f32 eta eta)) (-.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))
(/.f32 (neg.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)))) (neg.f32 (fma.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)))))
(/.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 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (/.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 eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32))) (fma.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32))))
(fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta)
(fma.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal -1/2 binary32) eta) 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 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (fma.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)))) (/.f32 (pow.f32 eta #s(literal 3 binary32)) (fma.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)))))
(+.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 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #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 #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #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 #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 (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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(acos.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 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))))
(pow.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))) #s(literal 1/2 binary32))
(exp.f32 (*.f32 (log.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))) #s(literal 1/2 binary32)))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))) (fma.f32 eta eta #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)) (*.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))))))
(*.f32 (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 (exp.f32 (log.f32 eta))) #s(literal 2 binary32)))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))
(*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)
(*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O))
(*.f32 (*.f32 sinTheta_O sinTheta_O) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)))
(fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))
(fma.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))
(-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
(/.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))) #s(literal 1 binary32)) (-.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 1 binary32)))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 1 binary32)))))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))))
(fma.f32 (*.f32 #s(literal 1/2 binary32) sinTheta_O) sinTheta_O #s(literal 1 binary32))
(fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32))
(fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
(+.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 1 binary32))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))
#s(literal 1/2 binary32)
(*.f32 (pow.f32 sinTheta_O #s(literal 1 binary32)) (pow.f32 sinTheta_O #s(literal 1 binary32)))
(*.f32 (neg.f32 sinTheta_O) (neg.f32 sinTheta_O))
(*.f32 (fabs.f32 sinTheta_O) (fabs.f32 sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(+.f32 (cosh.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
#s(literal 1 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))))
(asin.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)
(*.f32 h (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
(pow.f32 (sqrt.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal -1 binary32))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32))
(exp.f32 (*.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) #s(literal 1/2 binary32)))
(/.f32 #s(literal -1 binary32) (neg.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
(pow.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))) #s(literal -1 binary32))
(exp.f32 (*.f32 (log.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal -1 binary32)))
(-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))) (fma.f32 eta eta (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 eta eta (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 eta eta (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(+.f32 (*.f32 eta eta) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (*.f32 eta eta) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) sinTheta_O) sinTheta_O)
(*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))
(*.f32 (*.f32 sinTheta_O sinTheta_O) (cosh.f32 (atanh.f32 sinTheta_O)))
(/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(pow.f32 (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))
(exp.f32 (*.f32 (log.f32 (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32)))
(exp.f32 (*.f32 (neg.f32 (log1p.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O))) #s(literal 1/2 binary32)))
(cosh.f32 (atanh.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(cosh.f32 (atanh.f32 (neg.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 (fabs.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 sinTheta_O))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 (*.f32 (sin.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (cos.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (sin.f32 (asin.f32 sinTheta_O))))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))))
(sin.f32 (acos.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(sin.f32 (acos.f32 (neg.f32 sinTheta_O)))
(sin.f32 (acos.f32 (fabs.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(exp.f32 (*.f32 (log1p.f32 (*.f32 (neg.f32 sinTheta_O) sinTheta_O)) #s(literal 1/2 binary32)))
(cos.f32 (neg.f32 (asin.f32 sinTheta_O)))
(cos.f32 (asin.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(cos.f32 (asin.f32 (neg.f32 sinTheta_O)))
(cos.f32 (asin.f32 (fabs.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 #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)))
#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) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 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 2 binary32)) (*.f32 eta eta)) (-.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))
(/.f32 (neg.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)))) (neg.f32 (fma.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)))))
(/.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 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (/.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 eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32))) (fma.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32))))
(fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta)
(fma.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal -1/2 binary32) eta) 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 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (fma.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)))) (/.f32 (pow.f32 eta #s(literal 3 binary32)) (fma.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)))))
(+.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 (fma.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32) eta))
(/.f32 (-.f32 (*.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32))) (pow.f32 eta #s(literal 6 binary32))) (-.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))))
(/.f32 (+.f32 (pow.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)) #s(literal 3 binary32)) (pow.f32 (pow.f32 eta #s(literal 3 binary32)) #s(literal 3 binary32))) (fma.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (-.f32 (pow.f32 eta #s(literal 6 binary32)) (*.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 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3/2 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3/2 binary32)) (pow.f32 eta #s(literal 3 binary32)))
(fma.f32 (pow.f32 eta #s(literal 3/2 binary32)) (pow.f32 eta #s(literal 3/2 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)))
(fma.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (pow.f32 eta #s(literal 3 binary32)))
(fma.f32 (*.f32 eta eta) eta (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)))
(fma.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 3 binary32)))
(fma.f32 eta (*.f32 eta eta) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)))
(+.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)))
(+.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)))
(*.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3/2 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3/2 binary32)))
(*.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))
(*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)))
(/.f32 (pow.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (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))
(+.f32 (cosh.f32 (*.f32 (log.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) #s(literal 3 binary32))) (sinh.f32 (*.f32 (log.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) #s(literal 3 binary32))))
(exp.f32 (*.f32 (log.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) #s(literal 3 binary32)))
(*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))
(*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal -1/2 binary32) eta))
(*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O))
(*.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)))
(/.f32 (neg.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) (neg.f32 eta))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)
(*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))
(*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O (*.f32 sinTheta_O #s(literal -1/2 binary32)))
#s(literal 3 binary32)
(*.f32 (pow.f32 eta #s(literal 3/2 binary32)) (pow.f32 eta #s(literal 3/2 binary32)))
(*.f32 (*.f32 eta eta) eta)
(*.f32 eta (*.f32 eta eta))
(pow.f32 eta #s(literal 3 binary32))
(+.f32 (cosh.f32 (*.f32 (log.f32 eta) #s(literal 3 binary32))) (sinh.f32 (*.f32 (log.f32 eta) #s(literal 3 binary32))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 3 binary32)))
(-.f32 (+.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (*.f32 eta eta)) (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))
(/.f32 (-.f32 (*.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32))) (*.f32 (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))) (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))))) (-.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))))))
(/.f32 (+.f32 (pow.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))) #s(literal 3 binary32))) (fma.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (-.f32 (*.f32 (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))) (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))))) (*.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))))))))
(fma.f32 (neg.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (neg.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))))
(fma.f32 (fabs.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (fabs.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 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 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))))
(fma.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)))
(+.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))))
(+.f32 (*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)))
(*.f32 eta (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))))
(-.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 4 binary32)) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta) (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))) (fma.f32 eta eta (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta) (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)))))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) eta))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) eta))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) eta))
(fma.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)) (*.f32 (neg.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) eta))
(fma.f32 eta eta (*.f32 (neg.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) eta))
(+.f32 (*.f32 eta eta) (*.f32 (neg.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #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 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)
#s(approx (- (/ (PI) 2) (acos (/ 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 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (-.f32 (*.f32 (PI.f32) #s(literal 1/2 binary32)) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))))
#s(approx (acos (/ h (sqrt (- (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 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (-.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -3/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 (fma.f32 #s(literal 3/8 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 5/16 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) #s(literal 1 binary32))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)))
#s(approx (* sinTheta_O sinTheta_O) (*.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 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 sinTheta_O (tan.f32 (asin.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 (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 sinTheta_O sinTheta_O)) (*.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 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 (/.f32 (pow.f32 eta #s(literal -3 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (+.f32 (/.f32 (*.f32 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 (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))))
#s(approx (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))
#s(approx (/ 1 (sin (acos sinTheta_O))) (cosh.f32 (atanh.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 (+ (* (* 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 (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (pow.f32 eta #s(literal 3 binary32)))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 3 binary32))) #s(literal -1/8 binary32) (pow.f32 eta #s(literal 3 binary32))))
#s(approx (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1/8 binary32)) (pow.f32 eta #s(literal 3 binary32))))
#s(approx (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (* (* sinTheta_O sinTheta_O) -1/2) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (*.f32 eta eta))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) (*.f32 eta eta)))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (fma.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) (*.f32 eta eta)))
#s(approx (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (* 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 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (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 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (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 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 6 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 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 1/2 binary32)))
#s(approx (* (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (* sinTheta_O sinTheta_O)) (*.f32 (+.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))
#s(approx (+ (* 1/2 (* sinTheta_O sinTheta_O)) 1) (*.f32 (+.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) 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 (sqrt.f32 (cosh.f32 (atanh.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) 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 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)))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (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))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 (/.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))) #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)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 (/.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))) #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))))) (sqrt.f32 (cosh.f32 (atanh.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 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 (/.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))) #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))) (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (+ (* (* 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 (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (-.f32 (neg.f32 (/.f32 (*.f32 (pow.f32 eta #s(literal 3 binary32)) #s(literal 0 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (fma.f32 (/.f32 eta (*.f32 sinTheta_O sinTheta_O)) #s(literal -1 binary32) (/.f32 #s(literal 1/2 binary32) eta))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (-.f32 (*.f32 (/.f32 (*.f32 (*.f32 (pow.f32 eta #s(literal 3 binary32)) #s(literal 0 binary32)) (*.f32 eta eta)) (pow.f32 sinTheta_O #s(literal 6 binary32))) #s(literal 2 binary32)) (fma.f32 (/.f32 (pow.f32 eta #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) #s(literal -2 binary32) (fma.f32 (/.f32 eta (*.f32 sinTheta_O sinTheta_O)) #s(literal -1 binary32) (fma.f32 (/.f32 (pow.f32 eta #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) #s(literal 2 binary32) (/.f32 #s(literal 1/2 binary32) eta))))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1/8 binary32)) (pow.f32 eta #s(literal 3 binary32))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (*.f32 (-.f32 (/.f32 (pow.f32 eta #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.f32 (pow.f32 eta #s(literal -3 binary32)) #s(literal 1/8 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 1/4 binary32)) (*.f32 eta eta)))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (*.f32 (fma.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32))) (pow.f32 sinTheta_O #s(literal 4 binary32))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (*.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) (fma.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) (pow.f32 sinTheta_O #s(literal 4 binary32))))) (pow.f32 sinTheta_O #s(literal 4 binary32))))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (*.f32 (+.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (* 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 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (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 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (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 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 6 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 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (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) 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 (sqrt.f32 (cosh.f32 (atanh.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) 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 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)))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (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))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.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))) #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)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 (/.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))) #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))))) (sqrt.f32 (cosh.f32 (atanh.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 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 (/.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))) #s(literal -1/2 binary32) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))
#s(approx h h)
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))
#s(approx (* (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 (tan.f32 (asin.f32 sinTheta_O)))))) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (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 #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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (- (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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (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 #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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (- (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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (* eta eta) (*.f32 eta eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (*.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))) (neg.f32 (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (*.f32 (*.f32 (/.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))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (/.f32 (*.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))) (neg.f32 (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (*.f32 (*.f32 (/.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 (tan.f32 (asin.f32 sinTheta_O)))))
#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 (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (/.f32 (fma.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1/8 binary32) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 eta #s(literal 3 binary32))))
#s(approx (pow eta 3) (pow.f32 eta #s(literal 3 binary32)))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (/.f32 (fma.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) #s(literal 1/2 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 1/4 binary32))) (*.f32 eta eta)))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (/.f32 (fma.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) (*.f32 eta eta)) (*.f32 eta eta) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 1/4 binary32))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) (*.f32 eta eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (- (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)) (cosh.f32 (atanh.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)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))) eta))
#s(approx (sqrt (- (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)) (cosh.f32 (atanh.f32 sinTheta_O)) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32)) eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (- (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)) (cosh.f32 (atanh.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)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))) eta))
#s(approx (sqrt (- (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)) (cosh.f32 (atanh.f32 sinTheta_O)) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32)) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32))) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta))))) #s(literal 1 binary32)) eta))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))) #s(literal 1 binary32)) (/.f32 (neg.f32 (*.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 (neg.f32 (*.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 (+ (* (* 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 (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (-.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 0 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1 binary32) #s(literal 1 binary32)) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta))) eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (-.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 0 binary32)) (*.f32 sinTheta_O sinTheta_O)) (pow.f32 eta #s(literal 6 binary32))) #s(literal 1/2 binary32) #s(literal 1 binary32)) (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal 0 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)))) eta))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (*.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/8 binary32) #s(literal 1 binary32)) (pow.f32 eta #s(literal 3 binary32))))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal 1/2 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (+ (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) (/ (* (* sinTheta_O sinTheta_O) -1/2) eta)) (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta))) (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal 1/4 binary32) #s(literal 1 binary32)) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) eta)) (*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal 1/2 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (- (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)) (cosh.f32 (atanh.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)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
#s(approx (sqrt (- (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)) (cosh.f32 (atanh.f32 sinTheta_O)) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (neg.f32 eta) (-.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) #s(literal 1 binary32))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (- (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)) (cosh.f32 (atanh.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)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
#s(approx (sqrt (- (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)) (cosh.f32 (atanh.f32 sinTheta_O)) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)))) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta))))) #s(literal 1 binary32)) eta)))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (neg.f32 eta) (-.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) #s(literal 1 binary32))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (neg.f32 eta) (-.f32 (neg.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 0 binary32)) (pow.f32 eta #s(literal 4 binary32)))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1/2 binary32) #s(literal 1 binary32)))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (neg.f32 eta) (-.f32 (*.f32 (/.f32 (*.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 0 binary32)) (*.f32 sinTheta_O sinTheta_O)) (pow.f32 eta #s(literal 6 binary32))) #s(literal 1/2 binary32)) (+.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1/2 binary32) #s(literal 1 binary32)) (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 0 binary32)) (pow.f32 eta #s(literal 4 binary32)))))))
#s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (neg.f32 (*.f32 (-.f32 (/.f32 (*.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 6 binary32))) (pow.f32 eta #s(literal 6 binary32))) #s(literal 1 binary32)) (pow.f32 eta #s(literal 3 binary32)))))

eval169.0ms (3.6%)

Memory
-40.5MiB live, 218.8MiB allocated; 69ms collecting garbage
Compiler

Compiled 30 535 to 3 472 computations (88.6% saved)

prune40.0ms (0.8%)

Memory
15.3MiB live, 65.0MiB allocated; 4ms collecting garbage
Pruning

18 alts after pruning (12 fresh and 6 done)

PrunedKeptTotal
New56910579
Fresh123
Picked325
Done044
Total57318591
Accuracy
99.7%
Counts
591 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓24.7%
(-.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))))
✓92.8%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))))))))
✓92.7%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
87.6%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
✓92.7%
(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.2%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
92.6%
(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)))))))
87.7%
(asin.f32 (/.f32 h (exp.f32 (*.f32 (log.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))) #s(literal 1/2 binary32)))))
✓97.1%
(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))))
▶97.2%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
74.2%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (fma.f32 (pow.f32 eta #s(literal 3/2 binary32)) (pow.f32 eta #s(literal 3/2 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #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)))))))
66.4%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta) (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))) (fma.f32 eta eta (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))))))))
74.6%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 #s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (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)))))))
✓94.8%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
▶90.1%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
▶90.1%
(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 (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))))) h)))
▶85.7%
(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)))
▶94.0%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
Compiler

Compiled 1 225 to 709 computations (42.1% saved)

series64.0ms (1.4%)

Memory
-4.8MiB live, 137.6MiB allocated; 15ms collecting garbage
Counts
45 → 260
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))
(fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)
sinTheta_O
(*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32))
(/.f32 sinTheta_O eta)
eta
#s(literal -1/2 binary32)
(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 #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))
(*.f32 eta eta)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(asin.f32 #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 (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.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) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))))) h))
(*.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 (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))))
(fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))
(neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))
(*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))
(tan.f32 (asin.f32 sinTheta_O))
(asin.f32 sinTheta_O)
Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 eta))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (* (/ sinTheta_O eta) -1/2) #s(hole binary32 (* -1/2 (/ sinTheta_O eta))))
#s(approx (/ sinTheta_O eta) #s(hole binary32 (/ sinTheta_O eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (pow eta 3))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))) (* 1/2 (/ 1 (pow eta 3))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2)))))))) (* 1/2 (* eta (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ 1 (pow eta 3))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (pow eta 4)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6)))) (/ 1 (pow eta 4)))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (+ (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))))) (/ 1 (pow eta 6))))) (/ 1 (pow eta 4)))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 1))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* 1/2 (pow sinTheta_O 2)))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2)))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/8 (pow sinTheta_O 2)) 1/2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (pow sinTheta_O 2)) 1/8)) 1/2)))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 1))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ 1 (* -1 (pow sinTheta_O 2)))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (cos (asin sinTheta_O)))) (pow eta 2))))
#s(approx (neg (* sinTheta_O (tan (asin sinTheta_O)))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (cos (asin sinTheta_O))))))
#s(approx (* sinTheta_O (tan (asin sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (cos (asin sinTheta_O)))))
#s(approx (tan (asin sinTheta_O)) #s(hole binary32 (/ sinTheta_O (cos (asin sinTheta_O)))))
#s(approx (asin sinTheta_O) #s(hole binary32 (asin sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (sqrt (/ (sqrt -1) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))) (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1)))))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2)))) (/ 1 (sqrt -1))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))) (pow sinTheta_O 2))) (+ (/ 1 (sqrt -1)) (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))) (pow sinTheta_O 3))) (+ (/ 1 (sqrt -1)) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (pow (sqrt -1) 3)))) (+ (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))) (/ (pow eta 4) (* (pow sinTheta_O 2) (pow (sqrt -1) 3))))))) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (sqrt -1) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (cos (asin sinTheta_O))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (/ sinTheta_O (cos (asin sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* 1/2 (* (sqrt (/ (sqrt -1) (pow sinTheta_O 5))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1 (/ (+ (* -1/2 (* (sqrt (* sinTheta_O (sqrt -1))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (* 1/2 (* (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))))) (pow sinTheta_O 3))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (+ (/ 1/2 (* sinTheta_O (pow (sqrt -1) 3))) (/ (pow eta 4) (* sinTheta_O (pow (sqrt -1) 3)))) (/ (pow eta 2) (pow (sqrt -1) 2))) sinTheta_O)) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 4)))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (* sinTheta_O (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) sinTheta_O)) (/ (pow eta 2) (pow (sqrt -1) 2))) sinTheta_O)) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sqrt -1) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (* -1 (/ sinTheta_O (cos (asin sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 eta) #s(hole binary32 (/ 1 eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (+ (* (/ (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2)))) (/ 1 (pow sinTheta_O 2))) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (+ (* (pow eta 2) (- (/ (* (pow eta 2) (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow sinTheta_O 4)) (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))))) (/ 1 (pow sinTheta_O 2))) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (cos (asin sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 6))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (+ (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (cos (asin sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 6))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
Calls

9 calls:

TimeVariablePointExpression
8.0ms
sinTheta_O
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) sinTheta_O (* (/ sinTheta_O eta) -1/2) (/ sinTheta_O eta) eta -1/2 (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 (/ 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))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 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))) (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (neg (* sinTheta_O (tan (asin sinTheta_O)))) (* sinTheta_O (tan (asin sinTheta_O))) (tan (asin sinTheta_O)) (asin sinTheta_O))
7.0ms
eta
@inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) sinTheta_O (* (/ sinTheta_O eta) -1/2) (/ sinTheta_O eta) eta -1/2 (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 (/ 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))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 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))) (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (neg (* sinTheta_O (tan (asin sinTheta_O)))) (* sinTheta_O (tan (asin sinTheta_O))) (tan (asin sinTheta_O)) (asin sinTheta_O))
7.0ms
sinTheta_O
@inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) sinTheta_O (* (/ sinTheta_O eta) -1/2) (/ sinTheta_O eta) eta -1/2 (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 (/ 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))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 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))) (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (neg (* sinTheta_O (tan (asin sinTheta_O)))) (* sinTheta_O (tan (asin sinTheta_O))) (tan (asin sinTheta_O)) (asin sinTheta_O))
6.0ms
eta
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) sinTheta_O (* (/ sinTheta_O eta) -1/2) (/ 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 (/ 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))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 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))) (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (neg (* sinTheta_O (tan (asin sinTheta_O)))) (* sinTheta_O (tan (asin sinTheta_O))) (tan (asin sinTheta_O)) (asin sinTheta_O))
6.0ms
h
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) sinTheta_O (* (/ sinTheta_O eta) -1/2) (/ sinTheta_O eta) eta -1/2 (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 (/ 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))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 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))) (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (neg (* sinTheta_O (tan (asin sinTheta_O)))) (* sinTheta_O (tan (asin sinTheta_O))) (tan (asin sinTheta_O)) (asin sinTheta_O))

rewrite217.0ms (4.6%)

Memory
23.8MiB live, 290.3MiB allocated; 40ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0136815145
0141412202
0801611885
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
305 → 405
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))
(fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)
sinTheta_O
(*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32))
(/.f32 sinTheta_O eta)
eta
#s(literal -1/2 binary32)
(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 #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))
(*.f32 eta eta)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(asin.f32 #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 (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.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) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))))) h))
(*.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 (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))))
(fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))
(neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))
(*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))
(tan.f32 (asin.f32 sinTheta_O))
(asin.f32 sinTheta_O)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 eta))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (* (/ sinTheta_O eta) -1/2) #s(hole binary32 (* -1/2 (/ sinTheta_O eta))))
#s(approx (/ sinTheta_O eta) #s(hole binary32 (/ sinTheta_O eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (pow eta 3))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))) (* 1/2 (/ 1 (pow eta 3))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2)))))))) (* 1/2 (* eta (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ 1 (pow eta 3))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (pow eta 4)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6)))) (/ 1 (pow eta 4)))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (+ (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))))) (/ 1 (pow eta 6))))) (/ 1 (pow eta 4)))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 1))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* 1/2 (pow sinTheta_O 2)))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2)))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/8 (pow sinTheta_O 2)) 1/2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (pow sinTheta_O 2)) 1/8)) 1/2)))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 1))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ 1 (* -1 (pow sinTheta_O 2)))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (cos (asin sinTheta_O)))) (pow eta 2))))
#s(approx (neg (* sinTheta_O (tan (asin sinTheta_O)))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (cos (asin sinTheta_O))))))
#s(approx (* sinTheta_O (tan (asin sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (cos (asin sinTheta_O)))))
#s(approx (tan (asin sinTheta_O)) #s(hole binary32 (/ sinTheta_O (cos (asin sinTheta_O)))))
#s(approx (asin sinTheta_O) #s(hole binary32 (asin sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (sqrt (/ (sqrt -1) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (+ (* -1/2 (* (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))) (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1)))))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2)))) (/ 1 (sqrt -1))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))) (pow sinTheta_O 2))) (+ (/ 1 (sqrt -1)) (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))) (pow sinTheta_O 3))) (+ (/ 1 (sqrt -1)) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (pow (sqrt -1) 3)))) (+ (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))) (/ (pow eta 4) (* (pow sinTheta_O 2) (pow (sqrt -1) 3))))))) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (sqrt -1) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (cos (asin sinTheta_O))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (/ sinTheta_O (cos (asin sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* 1/2 (* (sqrt (/ (sqrt -1) (pow sinTheta_O 5))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1 (/ (+ (* -1/2 (* (sqrt (* sinTheta_O (sqrt -1))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3))))) (* 1/2 (* (sqrt (/ (sqrt -1) sinTheta_O)) (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))))) (pow sinTheta_O 3))) (* -1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 2))) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (+ (/ 1/2 (* sinTheta_O (pow (sqrt -1) 3))) (/ (pow eta 4) (* sinTheta_O (pow (sqrt -1) 3)))) (/ (pow eta 2) (pow (sqrt -1) 2))) sinTheta_O)) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (/ (pow eta 2) (* sinTheta_O (pow (sqrt -1) 4)))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (* sinTheta_O (sqrt -1)))) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) sinTheta_O)) (/ (pow eta 2) (pow (sqrt -1) 2))) sinTheta_O)) (/ 1 (sqrt -1))) sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sqrt -1) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (* -1 (/ sinTheta_O (cos (asin sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 eta) #s(hole binary32 (/ 1 eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (+ (* (/ (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2)))) (/ 1 (pow sinTheta_O 2))) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (* (/ 1 (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* (pow eta 2) (- (+ (* (pow eta 2) (- (/ (* (pow eta 2) (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow sinTheta_O 4)) (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))))) (/ 1 (pow sinTheta_O 2))) (/ 1 (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (cos (asin sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 6))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (+ (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (cos (asin sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 6))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2))))) (pow eta 4))) (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta))
(/.f32 (-.f32 (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O)) (*.f32 eta eta)) (-.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) eta))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (fma.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) eta))))
(fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta)
(fma.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O eta)
(fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta)
(+.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O) eta)
(+.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) sinTheta_O))
sinTheta_O
(*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32))
(*.f32 #s(literal -1/2 binary32) (/.f32 sinTheta_O eta))
(/.f32 (*.f32 sinTheta_O #s(literal -1/2 binary32)) eta)
(/.f32 (*.f32 #s(literal -1/2 binary32) sinTheta_O) eta)
(/.f32 (neg.f32 sinTheta_O) (neg.f32 eta))
(/.f32 sinTheta_O eta)
eta
#s(literal -1/2 binary32)
(-.f32 (/.f32 (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 #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 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 eta eta)
(pow.f32 eta #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))
(*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)
(*.f32 h (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32))
(/.f32 #s(literal -1 binary32) (neg.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
(pow.f32 (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))) #s(literal -1 binary32))
(-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))) (fma.f32 eta eta (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (fma.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(fma.f32 eta eta (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(fma.f32 eta eta (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(+.f32 (*.f32 eta eta) (*.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (*.f32 eta eta) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) sinTheta_O) sinTheta_O)
(*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))
(*.f32 (*.f32 sinTheta_O sinTheta_O) (cosh.f32 (atanh.f32 sinTheta_O)))
(/.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32))
(pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal -1 binary32))
(cosh.f32 (atanh.f32 sinTheta_O))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))))
(sin.f32 (acos.f32 sinTheta_O))
(cos.f32 (neg.f32 (asin.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))
(*.f32 (pow.f32 sinTheta_O #s(literal 1 binary32)) (pow.f32 sinTheta_O #s(literal 1 binary32)))
(*.f32 (neg.f32 sinTheta_O) (neg.f32 sinTheta_O))
(*.f32 (fabs.f32 sinTheta_O) (fabs.f32 sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 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))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 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))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 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))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 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))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 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))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 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))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 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))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 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))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)) (*.f32 eta eta)))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)) (*.f32 eta eta))))
(pow.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)) (*.f32 eta eta))) #s(literal -1 binary32))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)) (*.f32 eta eta)))
(/.f32 (-.f32 (*.f32 (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)))) (pow.f32 eta #s(literal 4 binary32))) (-.f32 (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) (*.f32 eta eta)))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))) (-.f32 (*.f32 eta eta) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)))))
(/.f32 (+.f32 (pow.f32 (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 3 binary32)) (pow.f32 (*.f32 eta eta) #s(literal 3 binary32))) (fma.f32 (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) (*.f32 eta eta)))))
(/.f32 (+.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 (*.f32 (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)))) (*.f32 (*.f32 eta eta) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)))))))
(fma.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))
(fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)) (*.f32 eta eta))
(fma.f32 (neg.f32 eta) (neg.f32 eta) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))
(fma.f32 (fabs.f32 eta) (fabs.f32 eta) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))
(fma.f32 #s(literal -1 binary32) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (*.f32 eta eta))
(fma.f32 (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) #s(literal -1 binary32) (*.f32 eta eta))
(fma.f32 sinTheta_O (neg.f32 (tan.f32 (asin.f32 sinTheta_O))) (*.f32 eta eta))
(fma.f32 eta eta (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))
(+.f32 (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) (*.f32 eta eta))
(+.f32 (*.f32 eta eta) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))
(*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)))
(*.f32 #s(literal -1 binary32) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))
(*.f32 (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) #s(literal -1 binary32))
(*.f32 sinTheta_O (neg.f32 (tan.f32 (asin.f32 sinTheta_O))))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
(neg.f32 (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))
(*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)
(*.f32 sinTheta_O (tan.f32 (asin.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 (neg.f32 sinTheta_O) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (sin.f32 (asin.f32 sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
(/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))
(tan.f32 (+.f32 (asin.f32 sinTheta_O) (PI.f32)))
(tan.f32 (asin.f32 sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 sinTheta_O))
(asin.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 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (fma.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 1/2 binary32) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta))))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) h) eta))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) eta)) #s(literal -1/2 binary32)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (fma.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) (*.f32 eta eta)) #s(literal 1/2 binary32) #s(literal 3/8 binary32)) eta) (/.f32 (fma.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32) #s(literal 1/2 binary32)) eta))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) eta)
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))
#s(approx sinTheta_O sinTheta_O)
#s(approx (* (/ sinTheta_O eta) -1/2) (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)))
#s(approx (/ sinTheta_O eta) (/.f32 sinTheta_O eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 h eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (fma.f32 (/.f32 (/.f32 h (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32) (*.f32 (/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32) (*.f32 (/.f32 (pow.f32 eta #s(literal -3 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (fma.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 5 binary32))))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (/.f32 (pow.f32 eta #s(literal -3 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (+.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (+.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 8 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) (/.f32 (pow.f32 eta #s(literal -6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))) (*.f32 sinTheta_O sinTheta_O) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)) (*.f32 eta 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) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta h) (*.f32 (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (fma.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 1/2 binary32) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta))))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) h) eta))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 h eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta (*.f32 sinTheta_O sinTheta_O)) (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (pow.f32 eta #s(literal -3 binary32)))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (fma.f32 (*.f32 eta (*.f32 sinTheta_O sinTheta_O)) (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (fma.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 1/2 binary32) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta))))) (*.f32 (fma.f32 #s(literal 3/4 binary32) (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) eta))) (*.f32 sinTheta_O sinTheta_O) (*.f32 (pow.f32 eta #s(literal -3 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (fma.f32 (-.f32 (fma.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32)) (*.f32 (pow.f32 eta #s(literal -6 binary32)) #s(literal 1/2 binary32))) (neg.f32 (/.f32 (fma.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32) (pow.f32 eta #s(literal -6 binary32))) (*.f32 eta eta)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -6 binary32)))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -3/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (fma.f32 (fma.f32 #s(literal 3/8 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 5/16 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(literal 1 binary32))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 #s(literal 3/8 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (fma.f32 #s(literal 5/16 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(literal 1 binary32))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) #s(literal 1 binary32)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 #s(literal -1/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -1/16 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/8 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(literal 1 binary32))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) (fma.f32 #s(literal -1 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)))
#s(approx (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (*.f32 eta eta))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (fma.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)) (*.f32 eta eta)))
#s(approx (neg (* sinTheta_O (tan (asin sinTheta_O)))) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))
#s(approx (* sinTheta_O (tan (asin sinTheta_O))) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))
#s(approx (tan (asin sinTheta_O)) (tan.f32 (asin.f32 sinTheta_O)))
#s(approx (asin sinTheta_O) (asin.f32 sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 7 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) #s(literal 1/4 binary32) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32)))) #s(literal 1/4 binary32))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 eta #s(literal 4 binary32))) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 9/2 binary32)))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32)))) #s(literal 1/4 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) sinTheta_O))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (*.f32 (-.f32 (/.f32 eta (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (fma.f32 (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 6 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (fma.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (pow.f32 (*.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 7 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) #s(literal 1/4 binary32) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 #s(literal -1/2 binary32) (fma.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 eta eta))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32))))) (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 #s(literal -1/2 binary32) (fma.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 7 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) #s(literal 1/4 binary32) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (*.f32 eta eta))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 #s(literal -1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (neg.f32 (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) #s(literal -1 binary32))) (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (neg.f32 (/.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 sinTheta_O sinTheta_O))) (+.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (neg.f32 (/.f32 (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 sinTheta_O #s(literal 3 binary32)))) (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))) #s(literal 1/2 binary32) (+.f32 (/.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) (*.f32 sinTheta_O sinTheta_O))) (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) sinTheta_O)) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32))))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (*.f32 (neg.f32 sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (tan.f32 (asin.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 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 5 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal 1/2 binary32) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (*.f32 h (*.f32 (fma.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) #s(literal 1/2 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))) #s(literal -1 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal -1/4 binary32))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal 1/8 binary32) (pow.f32 eta #s(literal 4 binary32))) (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 7/2 binary32)))) (*.f32 (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal 1/4 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (fma.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (*.f32 (pow.f32 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 (cosh.f32 (atanh.f32 sinTheta_O))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (fma.f32 (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 5 binary32)))) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal 1/2 binary32) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (*.f32 h (*.f32 (fma.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) #s(literal 1/2 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32))) #s(literal -1 binary32) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 eta eta) h)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 eta eta)) (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))) (*.f32 (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 5 binary32)))) (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))))) #s(literal 1/2 binary32))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (fma.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (*.f32 eta eta)) #s(literal -1/2 binary32) (neg.f32 (/.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) (fma.f32 (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 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) (fma.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)))) (fma.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))))))) (pow.f32 sinTheta_O #s(literal 3 binary32))))) (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) #s(literal -1 binary32)) (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (/.f32 (+.f32 #s(literal 1/2 binary32) (pow.f32 eta #s(literal 4 binary32))) (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) (/.f32 (*.f32 eta eta) #s(literal -1 binary32))) sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (-.f32 (fma.f32 (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) #s(literal 1 binary32)) #s(literal 1/2 binary32) (/.f32 (*.f32 (fma.f32 (pow.f32 (sqrt.f32 #s(literal -1 binary32)) #s(literal -3 binary32)) #s(literal 1/2 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) (/.f32 #s(literal 1/2 binary32) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O)) (/.f32 (*.f32 eta eta) #s(literal -1 binary32))) sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (*.f32 eta eta) (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (fma.f32 eta eta (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 3/8 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (-.f32 (+.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))) #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32))))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (neg.f32 (*.f32 (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))
#s(approx h h)
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))) h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (fma.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32)) #s(literal 1/4 binary32))) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) (*.f32 eta eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)) (*.f32 (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (fma.f32 (*.f32 #s(literal 1/16 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 5 binary32)) #s(literal 1/4 binary32))) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32))) (*.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32)) #s(literal 1/4 binary32))) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))))) (*.f32 eta eta))) (*.f32 eta eta))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (/.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32) (*.f32 eta eta)) eta))
#s(approx eta eta)
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (*.f32 eta eta) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (fma.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (*.f32 eta eta) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (/ 1 eta) (/.f32 #s(literal 1 binary32) 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 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (* eta eta) (*.f32 eta eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32)))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 sinTheta_O (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (sqrt.f32 #s(literal -1 binary32)))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (fma.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 sinTheta_O (/.f32 (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) sinTheta_O) (fma.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) sinTheta_O) #s(literal 2 binary32)) #s(literal -1 binary32))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) #s(literal -1 binary32)))) (cosh.f32 (atanh.f32 sinTheta_O)) (neg.f32 (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))))) (*.f32 eta eta) (*.f32 (*.f32 #s(literal 1/2 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32))) (*.f32 sinTheta_O (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (sqrt.f32 #s(literal -1 binary32)))))) (*.f32 eta eta) (*.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 eta eta) (neg.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (-.f32 (fma.f32 (*.f32 (*.f32 eta eta) (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O))) (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 sinTheta_O #s(literal -2 binary32))) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 eta eta) (neg.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (fma.f32 (fma.f32 (-.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (neg.f32 (*.f32 (/.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 eta eta) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (*.f32 eta eta) (neg.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (*.f32 eta eta) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (-.f32 (*.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32)) eta))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(literal -1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32))) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) #s(literal 1 binary32)) eta))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 1 binary32)) (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 1 binary32)) (fma.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -1 binary32) (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (fma.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1 binary32)) (neg.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (fma.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) #s(literal 1 binary32)) (*.f32 #s(literal -1 binary32) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 (fma.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin 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))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (neg.f32 eta) (+.f32 (fma.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) (fma.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) #s(literal 1 binary32))))
#s(approx (+ (* sinTheta_O (* (/ sinTheta_O eta) -1/2)) eta) (*.f32 (neg.f32 eta) (-.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) #s(literal 1 binary32))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32))) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) #s(literal 1 binary32)) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (fma.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (fma.f32 (*.f32 h (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32) (fma.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32)))) h) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (fma.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (fma.f32 (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (*.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32) (neg.f32 (*.f32 (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32) (fma.f32 (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) #s(literal 1 binary32)) eta)))

eval55.0ms (1.2%)

Memory
-3.1MiB live, 101.5MiB allocated; 17ms collecting garbage
Compiler

Compiled 25 167 to 3 023 computations (88% saved)

prune27.0ms (0.6%)

Memory
7.2MiB live, 52.9MiB allocated; 5ms collecting garbage
Pruning

22 alts after pruning (13 fresh and 9 done)

PrunedKeptTotal
New4457452
Fresh167
Picked235
Done066
Total44822470
Accuracy
99.8%
Counts
470 → 22
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓24.7%
(-.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))))
24.7%
(-.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))))
✓92.8%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))))))))
✓92.7%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
✓92.7%
(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.2%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
92.6%
(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)))))))
87.7%
(asin.f32 (/.f32 h (exp.f32 (*.f32 (log.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))) #s(literal 1/2 binary32)))))
✓97.1%
(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))))
✓97.2%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
74.2%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (fma.f32 (pow.f32 eta #s(literal 3/2 binary32)) (pow.f32 eta #s(literal 3/2 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #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)))))))
66.4%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta) (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))) (fma.f32 eta eta (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))))))))
74.6%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 #s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (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)))))))
✓94.8%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
41.1%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 #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))))) (*.f32 sinTheta_O sinTheta_O))))) h)))
89.9%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) #s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
90.0%
(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 (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))) h)))
✓85.7%
(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)))
81.8%
(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))) (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))))) h)))
90.0%
(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))) #s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) sinTheta_O))))) h)))
76.3%
(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))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) eta))) h)))
✓94.0%
(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 2 158 to 815 computations (62.2% saved)

regimes92.0ms (2%)

Memory
-2.1MiB live, 195.7MiB allocated; 26ms collecting garbage
Counts
32 → 1
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (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))))) (*.f32 eta eta)))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #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 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 #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 (neg.f32 (*.f32 sinTheta_O sinTheta_O)))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) #s(approx (* (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (fma.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))))))))
(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))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 #s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (fma.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 3 binary32))) #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) eta))) 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) (sqrt.f32 #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))))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 #s(approx (+ (pow (/ (* (* sinTheta_O sinTheta_O) -1/2) eta) 3) (pow eta 3)) (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)))))))
(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))) (exp.f32 (*.f32 (log.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 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (fma.f32 eta eta (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))))) h)))
(asin.f32 (/.f32 h (exp.f32 (*.f32 (log.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (*.f32 (fma.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32) #s(literal 1 binary32)) sinTheta_O) sinTheta_O)))) #s(literal 1/2 binary32)))))
(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))) #s(approx (+ (* eta eta) (neg (* sinTheta_O (tan (asin sinTheta_O))))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) sinTheta_O))))) h)))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 #s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(literal 1 binary32))))))))
(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))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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)))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (fma.f32 (pow.f32 eta #s(literal 3/2 binary32)) (pow.f32 eta #s(literal 3/2 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #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)))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #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 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta) (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))) (fma.f32 eta eta (/.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))))))))
Outputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
Calls

10 calls:

14.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))))))
11.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
eta
8.0ms
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
8.0ms
h
Results
AccuracySegmentsBranch
97.2%1(*.f32 sinTheta_O sinTheta_O)
97.2%1(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
97.2%1(*.f32 eta eta)
97.2%1(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
97.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))))))
97.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)))))))
97.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))))))))
97.2%1sinTheta_O
97.2%1h
97.2%1eta
Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes26.0ms (0.6%)

Memory
-20.2MiB live, 69.8MiB allocated; 6ms collecting garbage
Accuracy

Total -23.4b remaining (-1409.6%)

Threshold costs -23.4b (-1409.6%)

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

10 calls:

6.0ms
(*.f32 eta eta)
3.0ms
h
2.0ms
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))))))))
Results
AccuracySegmentsBranch
94.8%1(*.f32 sinTheta_O sinTheta_O)
94.8%1(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
94.8%1(*.f32 eta eta)
94.8%1(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
94.8%1(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
94.8%1(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
94.8%1(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
94.8%1sinTheta_O
94.8%1h
94.8%1eta
Compiler

Compiled 83 to 71 computations (14.5% saved)

simplify53.0ms (1.1%)

Memory
6.6MiB live, 58.2MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02147
13547
27947
316247
426247
548647
6280047
7687147
Stop Event
1×node limit
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
Outputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (fma.f32 sinTheta_O (*.f32 (/.f32 sinTheta_O eta) #s(literal -1/2 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))

derivations44.0ms (0.9%)

Memory
-14.5MiB live, 74.1MiB allocated; 9ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 47 to 21 computations (55.3% saved)

preprocess15.0ms (0.3%)

Memory
35.2MiB live, 35.2MiB 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...