HairBSDF, gamma for a refracted ray

Time bar (total: 6.1s)

start0.0ms (0%)

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

analyze235.0ms (3.8%)

Memory
43.5MiB live, 562.6MiB allocated; 46ms collecting garbage
Algorithm
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)

sample3.4s (55.4%)

Memory
-79.6MiB live, 5 753.4MiB allocated; 2.2s collecting garbage
Samples
1.8s8 256×0valid
940.0ms8 261×0invalid
Precisions
Click to see histograms. Total time spent on operations: 2.1s
ival-mult: 1.1s (51.8% of total)
ival-sub: 321.0ms (15.2% of total)
ival-div: 272.0ms (12.9% of total)
ival-sqrt: 248.0ms (11.8% of total)
ival-asin: 149.0ms (7.1% of total)
exact: 17.0ms (0.8% of total)
adjust: 5.0ms (0.2% of total)
ival-assert: 3.0ms (0.1% of total)
Bogosity

explain198.0ms (3.2%)

Memory
22.5MiB live, 451.1MiB allocated; 35ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
260-10(1.6363387041615272e-37 -2.0079342210927737e-34 1.5930869528531054e-21)(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
00-0-eta
00-0-#s(literal 1 binary32)
00-0-(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
00-0-(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
00-0-(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
00-0-(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
00-0-(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
00-0-(*.f32 eta eta)
00-0-(*.f32 sinTheta_O sinTheta_O)
00-0-(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
00-0-sinTheta_O
00-0-h
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sqrt.f32(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))uflow-rescue160
(*.f32 sinTheta_O sinTheta_O)underflow300
(-.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))))underflow150
(*.f32 eta eta)underflow16
Confusion
Predicted +Predicted -
+169
-0231
Precision
1.0
Recall
0.64
Confusion?
Predicted +Predicted MaybePredicted -
+1609
-00231
Precision?
1.0
Recall?
0.64
Freqs
test
numberfreq
0240
116
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
59.0ms512×0valid
Compiler

Compiled 212 to 43 computations (79.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 38.0ms
ival-sqrt: 10.0ms (26.6% of total)
ival-div: 7.0ms (18.6% of total)
ival-mult: 7.0ms (18.6% of total)
ival-sub: 6.0ms (15.9% of total)
ival-asin: 5.0ms (13.3% of total)
ival-true: 1.0ms (2.7% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

preprocess214.0ms (3.5%)

Memory
-61.0MiB live, 254.1MiB allocated; 38ms 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
iter limit
node limit
iter limit
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.2MiB live, 0.2MiB allocated; 0ms collecting garbage
Compiler

Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
92.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))))))))
Compiler

Compiled 18 to 13 computations (27.8% saved)

series49.0ms (0.8%)

Memory
-0.6MiB live, 98.8MiB allocated; 11ms 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
17.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)))))) (- (* 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)
6.0ms
sinTheta_O
@inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)
6.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)
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)
4.0ms
sinTheta_O
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)

rewrite127.0ms (2.1%)

Memory
-5.5MiB live, 231.9MiB allocated; 13ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval20.0ms (0.3%)

Memory
25.5MiB live, 72.2MiB allocated; 4ms collecting garbage
Compiler

Compiled 5 481 to 1 097 computations (80% saved)

prune39.0ms (0.6%)

Memory
15.6MiB live, 50.6MiB allocated; 5ms collecting garbage
Pruning

10 alts after pruning (9 fresh and 1 done)

PrunedKeptTotal
New1409149
Fresh000
Picked011
Done000
Total14010150
Accuracy
98.6%
Counts
150 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
20.4%
(-.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))))))))
92.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))))))))
92.0%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))))))
92.0%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))))
91.7%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
88.5%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
97.3%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
92.0%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))))
95.0%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
87.3%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
Compiler

Compiled 502 to 351 computations (30.1% saved)

series163.0ms (2.7%)

Memory
-2.4MiB live, 177.6MiB allocated; 44ms collecting garbage
Counts
41 → 162
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.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)))))) (+.f32 (*.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)))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))
(+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)
(*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))
(/.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 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 eta eta)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))
#s(literal 1 binary32)
(*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O))
#s(literal 1/2 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))))))))
(/.f32 (PI.f32) #s(literal 2 binary32))
(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)))))))
(/.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)))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) #s(hole binary32 (* -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 (/ (* 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 (* 1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (* 1/2 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) #s(hole binary32 (- (* 1/2 (PI)) (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))))
#s(approx (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) #s(hole binary32 (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/8 (/ (pow sinTheta_O 2) (* (pow eta 3) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* eta (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 3)))) (* 1/8 (/ 1 (* (pow eta 3) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* eta (sin (acos sinTheta_O))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))
#s(approx (sin (acos sinTheta_O)) #s(hole binary32 (sin (acos sinTheta_O))))
#s(approx (acos sinTheta_O) #s(hole binary32 (acos sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* 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 (* 1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1/2 (pow sinTheta_O 2))))
#s(approx (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1/2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/16 (* (/ (pow eta 6) (* (pow sinTheta_O 6) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* 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) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/16 (* (/ (pow eta 6) (* (pow sinTheta_O 6) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (* (/ (pow eta 2) (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* -1/8 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* 1/2 (* (/ 1 (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* 1/2 (* (/ 1 (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* -1/8 (* (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* 1/16 (* (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1/16 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1/16 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))))))))))
Calls

9 calls:

TimeVariablePointExpression
86.0ms
sinTheta_O
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (/ (* sinTheta_O 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) (/ (* 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))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) 1 (* 1/2 (* sinTheta_O sinTheta_O)) 1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
29.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 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) (/ (* 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))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) 1 (* 1/2 (* sinTheta_O sinTheta_O)) 1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
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) -1/2) (/ (* 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) (/ (* 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))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) 1 (* 1/2 (* sinTheta_O sinTheta_O)) 1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos 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 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) (/ (* 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))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) 1 (* 1/2 (* sinTheta_O sinTheta_O)) 1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
6.0ms
eta
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (/ (* 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) (/ (* 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))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) 1 (* 1/2 (* sinTheta_O sinTheta_O)) 1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))

rewrite306.0ms (5%)

Memory
14.1MiB live, 248.7MiB allocated; 84ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
09838086
010277051
056287051
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
203 → 262
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.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)))))) (+.f32 (*.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)))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))
(+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)
(*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))
(/.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 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 eta eta)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))
#s(literal 1 binary32)
(*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O))
#s(literal 1/2 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))))))))
(/.f32 (PI.f32) #s(literal 2 binary32))
(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)))))))
(/.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)))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) #s(hole binary32 (* -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 (/ (* 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 (* 1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (* 1/2 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) #s(hole binary32 (- (* 1/2 (PI)) (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))))
#s(approx (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) #s(hole binary32 (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/8 (/ (pow sinTheta_O 2) (* (pow eta 3) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* eta (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 3)))) (* 1/8 (/ 1 (* (pow eta 3) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* eta (sin (acos sinTheta_O))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))
#s(approx (sin (acos sinTheta_O)) #s(hole binary32 (sin (acos sinTheta_O))))
#s(approx (acos sinTheta_O) #s(hole binary32 (acos sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* 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 (* 1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1/2 (pow sinTheta_O 2))))
#s(approx (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1/2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/16 (* (/ (pow eta 6) (* (pow sinTheta_O 6) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* 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) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/16 (* (/ (pow eta 6) (* (pow sinTheta_O 6) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (* (/ (pow eta 2) (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* -1/8 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* 1/2 (* (/ 1 (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* 1/2 (* (/ 1 (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* -1/8 (* (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* 1/16 (* (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1/16 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1/16 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))))))))))
Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.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) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))
(/.f32 (-.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (*.f32 eta eta)) (-.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))
(/.f32 (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))) (-.f32 eta (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))))
(/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(/.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32))) (+.f32 (*.f32 eta eta) (-.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (*.f32 eta (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))))))
(-.f32 eta (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sinTheta_O sinTheta_O) eta)))
(+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)
(+.f32 eta (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))
(*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))
(*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 sinTheta_O sinTheta_O) eta))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)
(*.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)
(*.f32 (pow.f32 sinTheta_O #s(literal 1 binary32)) (pow.f32 sinTheta_O #s(literal 1 binary32)))
(*.f32 (neg.f32 sinTheta_O) (neg.f32 sinTheta_O))
(*.f32 (fabs.f32 sinTheta_O) (fabs.f32 sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
sinTheta_O
eta
#s(literal -1/2 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
(pow.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))) (+.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (+.f32 (*.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))) (*.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 eta eta)
(pow.f32 eta #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.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 (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))))))
(pow.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))))) #s(literal 1/2 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))))) (+.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))))
(*.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))))
#s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 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 #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 #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 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))))))
(-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))
(+.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 #s(literal 1/2 binary32) sinTheta_O) sinTheta_O)
(*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))
(*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O))
#s(literal 1/2 binary32)
(/.f32 (-.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O)))))))))
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))) (+.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 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) (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 (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 (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(acos.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 (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))))) (+.f32 (*.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)) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 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)))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (acos.f32 sinTheta_O))
(cos.f32 (asin.f32 sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (asin.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (asin.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (pow.f32 eta #s(literal 3 binary32))) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (+.f32 (*.f32 (*.f32 eta h) (*.f32 (-.f32 (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32)) (*.f32 #s(literal -3/4 binary32) (pow.f32 eta #s(literal -6 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) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (+.f32 (*.f32 (*.f32 eta h) (*.f32 (-.f32 (-.f32 (-.f32 (*.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32))) (*.f32 #s(literal -1/2 binary32) (pow.f32 eta #s(literal -6 binary32)))) (neg.f32 (/.f32 (+.f32 (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)))) (*.f32 (/.f32 (-.f32 (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32)) (*.f32 #s(literal -3/4 binary32) (pow.f32 eta #s(literal -6 binary32)))) (*.f32 eta eta)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O))) (*.f32 (*.f32 eta h) (-.f32 (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32)) (*.f32 #s(literal -3/4 binary32) (pow.f32 eta #s(literal -6 binary32))))))) (*.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) (sin (acos sinTheta_O))))) eta)
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (+.f32 (*.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) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.f32 (/.f32 (*.f32 (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (+.f32 (*.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O)) eta) (/.f32 (+.f32 (*.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) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))
#s(approx (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))
#s(approx (/ (* sinTheta_O sinTheta_O) eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) eta))
#s(approx (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx sinTheta_O sinTheta_O)
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 eta eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (+.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (+.f32 (*.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) (sin (acos sinTheta_O)))) (+.f32 (*.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) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (+.f32 (*.f32 (-.f32 #s(literal 1/2 binary32) (*.f32 #s(literal -3/8 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (+.f32 (*.f32 (+.f32 (*.f32 (+.f32 (*.f32 #s(literal 5/16 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))
#s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))
#s(approx (sin (acos sinTheta_O)) (+.f32 (*.f32 (-.f32 (*.f32 #s(literal -1/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)))
#s(approx (sin (acos sinTheta_O)) (+.f32 (*.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 (* 1/2 (* sinTheta_O sinTheta_O))) #s(literal 1 binary32))
#s(approx (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))
#s(approx (* 1/2 (* sinTheta_O sinTheta_O)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (-.f32 (*.f32 (PI.f32) #s(literal 1/2 binary32)) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h))))
#s(approx (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 eta #s(literal 3 binary32)))) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 eta #s(literal 3 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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (+.f32 (/.f32 (*.f32 #s(literal 3/8 binary32) h) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 5 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) eta)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (-.f32 (/.f32 (*.f32 #s(literal -1/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 3 binary32)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) eta))) (*.f32 sinTheta_O sinTheta_O)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (-.f32 (*.f32 (-.f32 (/.f32 (*.f32 #s(literal -1/16 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 5 binary32)))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) eta))) (*.f32 sinTheta_O sinTheta_O)) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 eta eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (+.f32 (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 eta eta)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (sin (acos sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
#s(approx (acos sinTheta_O) (acos.f32 sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (+.f32 (*.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) (sin (acos sinTheta_O)))))) (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32))))) (*.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) (sin (acos sinTheta_O)))))) (+.f32 (*.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 (+.f32 (+.f32 (/.f32 (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32))) (*.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))) h)) #s(literal -1/2 binary32)) (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32))))) (*.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) (sin (acos 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) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (*.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) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) (*.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))) (*.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)))))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) (*.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)))))) (+.f32 (*.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)) (*.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))))))) sinTheta_O))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (*.f32 (-.f32 (/.f32 eta (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))) (*.f32 (-.f32 (+.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 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) (sin (acos sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos 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) (sin (acos sinTheta_O))) (*.f32 (-.f32 (+.f32 (-.f32 (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))))) (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (sin (acos sinTheta_O)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (sin (acos sinTheta_O)) (*.f32 (+.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (sin (acos sinTheta_O)) (*.f32 (-.f32 (+.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (sin (acos sinTheta_O)) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 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 (* 1/2 (* sinTheta_O sinTheta_O))) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal -1/2 binary32))) sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 h (/.f32 (+.f32 (*.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)))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal -1/2 binary32)))) sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 h (/.f32 (+.f32 (*.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)))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (+.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32))) (*.f32 (/.f32 (*.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)) (+.f32 (*.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))) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal -1/2 binary32)))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 sinTheta_O (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (*.f32 (*.f32 (/.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/8 binary32)) (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (*.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 5/2 binary32)) (/.f32 (pow.f32 eta #s(literal 6 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32))))) #s(literal 1/16 binary32)) (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) (*.f32 (*.f32 (/.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/8 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (+.f32 (*.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) (sin (acos sinTheta_O)))))) (+.f32 (+.f32 (*.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 (*.f32 #s(literal 1/2 binary32) (*.f32 (+.f32 (/.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) (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) (sin (acos sinTheta_O)))))) (+.f32 (neg.f32 (/.f32 (+.f32 (*.f32 (*.f32 h (*.f32 (+.f32 (*.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))))) (+.f32 (/.f32 (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32)))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (*.f32 (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32)))) (+.f32 (*.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) (sin (acos 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) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (*.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) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O)) (*.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))) (*.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)))))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O)) (neg.f32 (/.f32 (+.f32 (*.f32 (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal 1/4 binary32)) (*.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)))))) (pow.f32 sinTheta_O #s(literal 3 binary32))))) (*.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)))))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos 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) (sin (acos sinTheta_O)))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (+.f32 (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)) (*.f32 eta eta)) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos 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) (sin (acos sinTheta_O))) (neg.f32 (*.f32 (-.f32 (+.f32 (-.f32 (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))))) (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (sin (acos sinTheta_O)) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sin (acos sinTheta_O)) (neg.f32 (*.f32 (+.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (sin (acos sinTheta_O)) (neg.f32 (*.f32 (-.f32 (+.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (sin (acos sinTheta_O)) (neg.f32 (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 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) (sin (acos sinTheta_O)))))) (neg.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal -1/2 binary32))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 h (/.f32 (+.f32 (*.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)))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal -1/2 binary32)))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 h (/.f32 (+.f32 (*.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)))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (+.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32))) (*.f32 (/.f32 (*.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)) (+.f32 (*.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))) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 (*.f32 (*.f32 eta eta) h) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) #s(literal -1/2 binary32)))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 sinTheta_O (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (*.f32 (*.f32 (/.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/8 binary32)) (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (+.f32 (*.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 5/2 binary32)) (/.f32 (pow.f32 eta #s(literal 6 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32))))) #s(literal 1/16 binary32)) (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)))) (*.f32 (*.f32 (/.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/8 binary32))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (+.f32 (*.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) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (-.f32 (*.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) (-.f32 (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 #s(literal -1/4 binary32) (/.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))))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 #s(literal -1/2 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)))) (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 (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) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.f32 (*.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (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 #s(literal -1/4 binary32) (/.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))))) (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) (-.f32 (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)))) (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (-.f32 (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 #s(literal -1/4 binary32) (/.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)))) (-.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))))))) (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) (sin (acos 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) (sin (acos sinTheta_O))))) (+.f32 (*.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) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (+.f32 (*.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)) (*.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) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (+.f32 (*.f32 (+.f32 (*.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 (*.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)) (*.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 (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (/.f32 (+.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) eta))
#s(approx eta eta)
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos 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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (*.f32 (/.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))) #s(literal -1/2 binary32)) (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.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))) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.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)))) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta)) (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.f32 (*.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.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)))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))) (*.f32 (/.f32 (*.f32 (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.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))) (sin.f32 (acos.f32 sinTheta_O))) (neg.f32 (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32)))) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta)) (*.f32 (*.f32 (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32))) (*.f32 eta eta)) (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (*.f32 (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 sinTheta_O (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (+.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (*.f32 (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/8 binary32))) (*.f32 eta eta)) (*.f32 sinTheta_O (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (+.f32 (*.f32 (-.f32 (*.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) #s(literal -1/8 binary32)) (*.f32 #s(literal -1/16 binary32) (*.f32 (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 5/2 binary32))))) (*.f32 eta eta)) (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 eta eta)) (*.f32 sinTheta_O (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (-.f32 h (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.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))) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (+.f32 (*.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))) (-.f32 (*.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 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (/.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)))) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) (+.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))) eta))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (*.f32 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta))) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (+.f32 (neg.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)) (*.f32 eta eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta))) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32))) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)))) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.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 (+.f32 (*.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 #s(literal -1/2 binary32) (*.f32 (/.f32 h (*.f32 eta eta)) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (/.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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (/.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)) (/.f32 (*.f32 #s(literal -1/8 binary32) (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))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (+.f32 (/.f32 (*.f32 #s(literal -1/16 binary32) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (/.f32 (*.f32 #s(literal -1/8 binary32) (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 (*.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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (+.f32 (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (-.f32 h (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.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))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (+.f32 (*.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))) (-.f32 (*.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 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (+.f32 (+.f32 (/.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)))) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (+.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) (+.f32 (*.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (sqrt.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal -3 binary32)))) #s(literal -1/16 binary32)) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
#s(approx (+ (* (/ (* 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32))) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 eta eta)))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.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 (+.f32 (*.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 #s(literal -1/2 binary32) (*.f32 (/.f32 h (*.f32 eta eta)) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (+.f32 (/.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))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (+.f32 (+.f32 (/.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)) (/.f32 (*.f32 #s(literal -1/8 binary32) (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(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (+.f32 (+.f32 (+.f32 (/.f32 (*.f32 #s(literal -1/16 binary32) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (/.f32 (*.f32 #s(literal -1/8 binary32) (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 (*.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))))

eval37.0ms (0.6%)

Memory
25.3MiB live, 115.4MiB allocated; 8ms collecting garbage
Compiler

Compiled 12 544 to 2 045 computations (83.7% saved)

prune22.0ms (0.4%)

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

13 alts after pruning (8 fresh and 5 done)

PrunedKeptTotal
New3354339
Fresh044
Picked145
Done011
Total33613349
Accuracy
99.6%
Counts
349 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
20.4%
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))) (+.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O)))))))))))
22.9%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
92.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))))))))
92.0%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))))))
92.0%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))))
91.7%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
88.5%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
77.1%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
97.3%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
98.2%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
92.0%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))))
95.0%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
87.3%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
Compiler

Compiled 756 to 430 computations (43.1% saved)

series134.0ms (2.2%)

Memory
-12.8MiB live, 273.2MiB allocated; 19ms collecting garbage
Counts
56 → 178
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.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)))))) (+.f32 (*.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)))))) (+.f32 (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))
(+.f32 (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta)
(*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32))
(*.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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
(/.f32 (PI.f32) #s(literal 2 binary32))
(PI.f32)
#s(literal 2 binary32)
(acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
(*.f32 eta eta)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
(-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))
#s(literal 1 binary32)
(*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta)
(-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))
(*.f32 #s(literal 1/2 binary32) (*.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)
(*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))) (+.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O)))))))))))
(-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32)))
(pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32))
#s(literal 3 binary32)
(pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))
(acos.f32 (/.f32 h (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)))))
(-.f32 (*.f32 eta eta) (/.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 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O))))))))))
(*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32)))
(+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O)))))))))
(*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O))))))))
Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) #s(hole binary32 (* -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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) #s(hole binary32 (- (* 1/2 (PI)) (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))))
#s(approx (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) #s(hole binary32 (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/8 (/ (pow sinTheta_O 2) (* (pow eta 3) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* eta (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 3)))) (* 1/8 (/ 1 (* (pow eta 3) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* eta (sin (acos 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 (/ (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (- 1 (* -1/2 (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* 1/2 (pow sinTheta_O 2)))))
#s(approx (* -1/2 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1/2 (pow sinTheta_O 2))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 eta))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(hole binary32 1))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(hole binary32 (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))))) #s(hole binary32 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (* eta eta)) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 2))))
#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 (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))))) #s(hole binary32 (/ (- (* 1/8 (pow (PI) 3)) (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 3)) (+ (* 1/4 (pow (PI) 2)) (+ (* 1/2 (* (PI) (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))) (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 2))))))
#s(approx (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) #s(hole binary32 (- (* 1/8 (pow (PI) 3)) (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 3))))
#s(approx (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3) #s(hole binary32 (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 3)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))
#s(approx (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))) #s(hole binary32 (+ (* 1/4 (pow (PI) 2)) (+ (* 1/2 (* (PI) (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))) (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 2)))))
#s(approx (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))) #s(hole binary32 (+ (* 1/2 (* (PI) (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))) (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 2))))
#s(approx (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) #s(hole binary32 (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 2)))
#s(approx (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) #s(hole binary32 (* 1/2 (* (PI) (acos (* 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 (* 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/16 (* (/ (pow eta 6) (* (pow sinTheta_O 6) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* 1/2 (pow sinTheta_O 4))))
#s(approx (* (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 4) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O)))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 (* eta (sin (acos sinTheta_O)))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) (* 1/2 (/ 1 (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/16 (* (/ (pow eta 6) (* (pow sinTheta_O 6) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (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 (/ 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) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (* (/ (pow eta 2) (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* -1/8 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* 1/2 (* (/ 1 (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* 1/2 (* (/ 1 (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* -1/8 (* (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* 1/16 (* (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (/ (+ (* -1/2 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) eta)))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (- (pow eta 2) (* 1/2 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1/16 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 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 (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1/16 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))))))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) 1)))))
Calls

9 calls:

TimeVariablePointExpression
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)) -1/2) (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) eta -1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (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)))))) (- (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) 1 (* -1/2 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))))) 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (/ (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))))) (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (pow (/ (PI) 2) 3) 3 (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))) (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))) (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))
16.0ms
h
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) eta -1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (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)))))) (- (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) 1 (* -1/2 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))))) 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (/ (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))))) (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (pow (/ (PI) 2) 3) 3 (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))) (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))) (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))
15.0ms
sinTheta_O
@0
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) eta -1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (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)))))) (- (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) 1 (* -1/2 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))))) 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (/ (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))))) (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (pow (/ (PI) 2) 3) 3 (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))) (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))) (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))
14.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 (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) eta -1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (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)))))) (- (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) 1 (* -1/2 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))))) 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (/ (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))))) (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (pow (/ (PI) 2) 3) 3 (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))) (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))) (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))
13.0ms
eta
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) eta -1/2 (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (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)))))) (- (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) 1 (* -1/2 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))))) 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (/ (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))))) (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (pow (/ (PI) 2) 3) 3 (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))) (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))) (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))

rewrite230.0ms (3.7%)

Memory
24.3MiB live, 257.9MiB allocated; 69ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
010319283
011118081
057928081
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
234 → 355
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.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)))))) (+.f32 (*.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)))))) (+.f32 (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))
(+.f32 (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta)
(*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32))
(*.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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
(/.f32 (PI.f32) #s(literal 2 binary32))
(PI.f32)
#s(literal 2 binary32)
(acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
(*.f32 eta eta)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
(-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))
#s(literal 1 binary32)
(*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta)
(-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))
(*.f32 #s(literal 1/2 binary32) (*.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)
(*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))) (+.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O)))))))))))
(-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32)))
(pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32))
#s(literal 3 binary32)
(pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))
(acos.f32 (/.f32 h (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)))))
(-.f32 (*.f32 eta eta) (/.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 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O))))))))))
(*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32)))
(+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O)))))))))
(*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O))))))))
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) #s(hole binary32 (* -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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) #s(hole binary32 (- (* 1/2 (PI)) (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))))
#s(approx (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) #s(hole binary32 (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/8 (/ (pow sinTheta_O 2) (* (pow eta 3) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* eta (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 3)))) (* 1/8 (/ 1 (* (pow eta 3) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* eta (sin (acos 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 (/ (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (- 1 (* -1/2 (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* 1/2 (pow sinTheta_O 2)))))
#s(approx (* -1/2 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1/2 (pow sinTheta_O 2))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 eta))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(hole binary32 1))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(hole binary32 (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))))) #s(hole binary32 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (* eta eta)) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 2))))
#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 (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))))) #s(hole binary32 (/ (- (* 1/8 (pow (PI) 3)) (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 3)) (+ (* 1/4 (pow (PI) 2)) (+ (* 1/2 (* (PI) (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))) (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 2))))))
#s(approx (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) #s(hole binary32 (- (* 1/8 (pow (PI) 3)) (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 3))))
#s(approx (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3) #s(hole binary32 (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 3)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))
#s(approx (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))) #s(hole binary32 (+ (* 1/4 (pow (PI) 2)) (+ (* 1/2 (* (PI) (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))) (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 2)))))
#s(approx (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))) #s(hole binary32 (+ (* 1/2 (* (PI) (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))) (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 2))))
#s(approx (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) #s(hole binary32 (pow (acos (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))) 2)))
#s(approx (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) #s(hole binary32 (* 1/2 (* (PI) (acos (* 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 (* 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/16 (* (/ (pow eta 6) (* (pow sinTheta_O 6) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* 1/2 (pow sinTheta_O 4))))
#s(approx (* (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 4) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1/2 (/ 1 (pow sinTheta_O 2))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O)))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 (* eta (sin (acos sinTheta_O)))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) (* 1/2 (/ 1 (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (sqrt -1))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1/8 (* (/ (pow eta 4) (* (pow sinTheta_O 4) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (+ (* 1/16 (* (/ (pow eta 6) (* (pow sinTheta_O 6) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))) (+ (* 1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (sqrt (/ 1 (sin (acos sinTheta_O)))) (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 (/ 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) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (* (/ (pow eta 2) (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* -1/8 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* 1/2 (* (/ 1 (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (+ (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* 1/2 (* (/ 1 (* sinTheta_O (sqrt -1))) (sqrt (sin (acos sinTheta_O))))) (* (pow eta 2) (+ (* -1/8 (* (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* 1/16 (* (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))) (sqrt (pow (sin (acos sinTheta_O)) 5)))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (/ (+ (* -1/2 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) eta)))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (- (pow eta 2) (* 1/2 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1/16 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 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 (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1/16 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))))))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) 1)))))
Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))
(/.f32 (-.f32 (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (*.f32 eta eta)) (-.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))
(/.f32 (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))) (-.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))))
(/.f32 (+.f32 (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 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))))
(/.f32 (+.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 (*.f32 eta eta) (-.f32 (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))) (*.f32 eta (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))))))
(-.f32 eta (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)))
(+.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 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32))
(*.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 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)
(*.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 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (*.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))) (+.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))))
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))) #s(literal 3 binary32))) (+.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (+.f32 (*.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))) (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))
(/.f32 (neg.f32 (PI.f32)) #s(literal -2 binary32))
(/.f32 (PI.f32) #s(literal 2 binary32))
(PI.f32)
#s(literal 2 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
(acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O))))))
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O)))))
(sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O))))
(pow.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O))) #s(literal 1/2 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O)) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O)))) (+.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O)) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (+.f32 (*.f32 #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O)) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O))) (*.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O))))))
(-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O)))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 eta eta)
(pow.f32 eta #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O))
(*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O)
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) (*.f32 sinTheta_O sinTheta_O))
(*.f32 (*.f32 sinTheta_O sinTheta_O) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))))
(+.f32 (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))
(/.f32 (-.f32 #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 #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 #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 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))))
(-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
(+.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 #s(literal -1/2 binary32) sinTheta_O) sinTheta_O)
(*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))
(*.f32 #s(literal -1/2 binary32) (*.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 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta))
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta)
(*.f32 eta (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))))
(+.f32 (*.f32 #s(literal 1 binary32) eta) (*.f32 (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) eta))
(+.f32 (*.f32 eta #s(literal 1 binary32)) (*.f32 eta (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) (*.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))))))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))))
(-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))
(+.f32 (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
(*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))
(*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))))
#s(literal 1/2 binary32)
(*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))
(/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O)))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta))
(*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta))
(*.f32 sinTheta_O (/.f32 sinTheta_O (*.f32 eta eta)))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 (*.f32 eta eta)))
(/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(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))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (acos.f32 sinTheta_O))
(cos.f32 (asin.f32 sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (asin.f32 sinTheta_O))
(acos.f32 sinTheta_O)
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 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)))))))))
(/.f32 (neg.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32)))) (neg.f32 (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)))))
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32))))
(-.f32 (/.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)))) (/.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32)) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 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 (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32))) (asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(/.f32 (-.f32 (*.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32))) (*.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32)))) (+.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))))
(/.f32 (-.f32 (pow.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) #s(literal 3 binary32)) (pow.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32)) #s(literal 3 binary32))) (+.f32 (*.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32))) (+.f32 (*.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))) (*.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))))))
(-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32)))
(*.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3/2 binary32)) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3/2 binary32)))
(*.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32)))
(*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)))
(/.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) #s(literal 8 binary32))
(pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32))
(exp.f32 (*.f32 (log.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) #s(literal 3 binary32)))
#s(literal 3 binary32)
(*.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3/2 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3/2 binary32)))
(*.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #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))))))))
(*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32)))
(pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))
(exp.f32 (*.f32 (log.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))) #s(literal 3 binary32)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(acos.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 (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))))) (+.f32 (*.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)) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 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 (-.f32 (*.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32))) (*.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))))) (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))))))
(/.f32 (+.f32 (pow.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) #s(literal 3 binary32))) (+.f32 (*.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32))) (-.f32 (*.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))))) (*.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))))))))
(+.f32 (+.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32))) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))))
(+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)))
(+.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))))
(*.f32 (neg.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (neg.f32 (/.f32 (PI.f32) #s(literal 2 binary32))))
(*.f32 (fabs.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (fabs.f32 (/.f32 (PI.f32) #s(literal 2 binary32))))
(*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32)))
(/.f32 (*.f32 (PI.f32) (/.f32 (PI.f32) #s(literal 2 binary32))) #s(literal 2 binary32))
(/.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (PI.f32)) #s(literal 2 binary32))
(/.f32 (*.f32 (PI.f32) (PI.f32)) #s(literal 4 binary32))
(pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32))
(*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))))
(/.f32 (-.f32 (*.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32))) (*.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))))) (-.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32)) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))))
(/.f32 (+.f32 (pow.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))) #s(literal 3 binary32))) (+.f32 (*.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32))) (-.f32 (*.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (*.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32)) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))))))
(-.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32)) (*.f32 (neg.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)))))))))
(+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32)))
(+.f32 (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32)) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))))
(*.f32 (neg.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))) (neg.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))))
(*.f32 (fabs.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))) (fabs.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))))
(*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 2 binary32))
(*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 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))))))))
(/.f32 (*.f32 (PI.f32) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))) #s(literal 2 binary32))
#s(approx (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (pow.f32 eta #s(literal 3 binary32))) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (+.f32 (*.f32 (*.f32 eta h) (*.f32 (-.f32 (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32)) (*.f32 #s(literal -3/4 binary32) (pow.f32 eta #s(literal -6 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) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (+.f32 (*.f32 (*.f32 eta h) (*.f32 (-.f32 (-.f32 (-.f32 (*.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32))) (*.f32 #s(literal -1/2 binary32) (pow.f32 eta #s(literal -6 binary32)))) (neg.f32 (/.f32 (+.f32 (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)))) (*.f32 (/.f32 (-.f32 (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32)) (*.f32 #s(literal -3/4 binary32) (pow.f32 eta #s(literal -6 binary32)))) (*.f32 eta eta)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O))) (*.f32 (*.f32 eta h) (-.f32 (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32)) (*.f32 #s(literal -3/4 binary32) (pow.f32 eta #s(literal -6 binary32))))))) (*.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) (sin (acos sinTheta_O))))) eta)
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (+.f32 (*.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) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.f32 (/.f32 (*.f32 (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (+.f32 (*.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O)) eta) (/.f32 (+.f32 (*.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) (+.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) eta))
#s(approx (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))
#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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (-.f32 (*.f32 (PI.f32) #s(literal 1/2 binary32)) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h))))
#s(approx (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (-.f32 (*.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 #s(literal -1/2 binary32) (/.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (+.f32 (*.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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (-.f32 eta (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (-.f32 (*.f32 (/.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 3 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -1/8 binary32)) (/.f32 #s(literal 1/2 binary32) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) eta))) (*.f32 sinTheta_O sinTheta_O)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (-.f32 (*.f32 (-.f32 (*.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 3 binary32))) #s(literal -1/16 binary32)) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) eta))) (*.f32 sinTheta_O sinTheta_O)) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 eta eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (+.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (+.f32 (*.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) (sin (acos sinTheta_O)))) (+.f32 (*.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) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (+.f32 (*.f32 (-.f32 #s(literal 1/2 binary32) (*.f32 #s(literal -3/8 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 (+.f32 (*.f32 (+.f32 (*.f32 (+.f32 (*.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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))
#s(approx (* (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (*.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) sinTheta_O) sinTheta_O))
#s(approx (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) #s(literal 1 binary32))
#s(approx (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))))
#s(approx (* -1/2 (* sinTheta_O sinTheta_O)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) eta)
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (-.f32 eta (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) #s(literal 1 binary32))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O))))) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))
#s(approx (/ 1 (sin (acos sinTheta_O))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (sin (acos sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
#s(approx (acos sinTheta_O) (acos.f32 sinTheta_O))
#s(approx (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (/.f32 (-.f32 (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) #s(literal 1/8 binary32)) (pow.f32 (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)) #s(literal 3 binary32))) (+.f32 (+.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) #s(literal 1/4 binary32)) (*.f32 (*.f32 (PI.f32) #s(literal 1/2 binary32)) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)))) (pow.f32 (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)) #s(literal 2 binary32)))))
#s(approx (- (pow (/ (PI) 2) 3) (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3)) (-.f32 (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) #s(literal 1/8 binary32)) (pow.f32 (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)) #s(literal 3 binary32))))
#s(approx (pow (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) 3) (pow.f32 (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)) #s(literal 3 binary32)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 eta eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (+.f32 (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 eta eta)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (+ (* (/ (PI) 2) (/ (PI) 2)) (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))))) (+.f32 (+.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) #s(literal 1/4 binary32)) (*.f32 (*.f32 (PI.f32) #s(literal 1/2 binary32)) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)))) (pow.f32 (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)) #s(literal 2 binary32))))
#s(approx (+ (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))))) (+.f32 (pow.f32 (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)) #s(literal 2 binary32)) (*.f32 (*.f32 (PI.f32) #s(literal 1/2 binary32)) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)))))
#s(approx (* (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (pow.f32 (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h)) #s(literal 2 binary32)))
#s(approx (* (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))))) (*.f32 (*.f32 (PI.f32) #s(literal 1/2 binary32)) (acos.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (+.f32 (*.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) (sin (acos sinTheta_O)))))) (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32))))) (*.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) (sin (acos sinTheta_O)))))) (+.f32 (*.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 (+.f32 (+.f32 (/.f32 (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32))) (*.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))) h)) #s(literal -1/2 binary32)) (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32))))) (*.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) (sin (acos 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) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (*.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) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) (*.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))) (*.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)))))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) (*.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)))))) (+.f32 (*.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)) (*.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))))))) 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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)))) sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (+.f32 (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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))))) sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (+.f32 (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (+.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32))) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (+.f32 (*.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))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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))))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 sinTheta_O (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/16 binary32) (/.f32 (pow.f32 eta #s(literal 6 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 5/2 binary32))) (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) (*.f32 (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))) (*.f32 (-.f32 (+.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (*.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 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) (sin (acos sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos 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) (sin (acos sinTheta_O))) (*.f32 (-.f32 (+.f32 (-.f32 (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))))) (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 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 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 1/2 binary32)))
#s(approx (* (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* 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 (* -1/2 (* sinTheta_O sinTheta_O))) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))
#s(approx (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (*.f32 (+.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1/2 binary32)))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (*.f32 (-.f32 (/.f32 eta (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) eta))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (*.f32 (/.f32 (pow.f32 eta #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (+.f32 (*.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) (sin (acos sinTheta_O)))))) (+.f32 (+.f32 (*.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 (*.f32 #s(literal 1/2 binary32) (*.f32 (+.f32 (/.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) (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) (sin (acos sinTheta_O)))))) (+.f32 (neg.f32 (/.f32 (+.f32 (*.f32 (*.f32 h (*.f32 (+.f32 (*.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))))) (+.f32 (/.f32 (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32)))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (*.f32 (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32)))) (+.f32 (*.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) (sin (acos 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) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (*.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) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O)) (*.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))) (*.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)))))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O)) (neg.f32 (/.f32 (+.f32 (*.f32 (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal 1/4 binary32)) (*.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)))))) (pow.f32 sinTheta_O #s(literal 3 binary32))))) (*.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)))))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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)))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (+.f32 (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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))))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (+.f32 (*.f32 (*.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) #s(literal -1 binary32))) #s(literal 1/4 binary32)) (*.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (+.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32))) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (+.f32 (*.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))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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))))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 sinTheta_O (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (*.f32 (+.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/16 binary32) (/.f32 (pow.f32 eta #s(literal 6 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 5/2 binary32))) (+.f32 (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 eta eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) (*.f32 (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos 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) (sin (acos sinTheta_O)))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (+.f32 (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)) (*.f32 eta eta)) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos 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) (sin (acos sinTheta_O))) (neg.f32 (*.f32 (-.f32 (+.f32 (-.f32 (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))))) (/.f32 #s(literal -5/16 binary32) (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (+.f32 (*.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) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (-.f32 (*.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) (-.f32 (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 #s(literal -1/4 binary32) (/.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))))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 #s(literal -1/2 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)))) (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 (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) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.f32 (*.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (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 #s(literal -1/4 binary32) (/.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))))) (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) (-.f32 (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)))) (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (-.f32 (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 #s(literal -1/4 binary32) (/.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)))) (-.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))))))) (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) (sin (acos 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) (sin (acos sinTheta_O))))) (+.f32 (*.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) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (+.f32 (*.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)) (*.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) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (+.f32 (*.f32 (+.f32 (*.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 (*.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)) (*.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 (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (/.f32 (+.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) eta))
#s(approx eta eta)
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.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 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.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))) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.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)))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta)) (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.f32 (*.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.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)))) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))) (*.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.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))) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32)))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))) (*.f32 eta eta)) (*.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (+.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 (*.f32 #s(literal -1/8 binary32) (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (*.f32 sinTheta_O (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (+.f32 (*.f32 (+.f32 (*.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 3 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (*.f32 #s(literal -1/16 binary32) (*.f32 (/.f32 (*.f32 eta eta) (pow.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 5/2 binary32))))) (*.f32 eta eta)) (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 eta eta)) (*.f32 sinTheta_O (sqrt.f32 (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos 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 (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (/.f32 (+.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 eta eta)) eta))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 eta eta)) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (+.f32 (*.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))) (-.f32 (*.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 #s(literal -1/2 binary32) (*.f32 (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 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) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (+.f32 (*.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))))) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (+.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32))) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.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 (-.f32 (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (*.f32 #s(literal 1/2 binary32) (*.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)))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (*.f32 eta eta)) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (*.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/8 binary32))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (+.f32 (+.f32 (-.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 #s(literal 1/8 binary32) (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))))) (*.f32 (/.f32 (/.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/16 binary32))) #s(literal 1 binary32)) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (+.f32 (neg.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (*.f32 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (+.f32 (/.f32 (neg.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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32))) (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (+.f32 (*.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))) (-.f32 (*.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 #s(literal -1/2 binary32) (*.f32 (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (+.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 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) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (+.f32 (+.f32 (+.f32 (*.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))))) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32))))
#s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (neg.f32 eta) (-.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1/2 binary32)) #s(literal 1 binary32))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32))) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.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 (-.f32 (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (*.f32 #s(literal 1/2 binary32) (*.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)))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (*.f32 eta eta)) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (+.f32 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (*.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/8 binary32)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (*.f32 (neg.f32 eta) (+.f32 (+.f32 (-.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 #s(literal 1/8 binary32) (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))))) (*.f32 (/.f32 (/.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/16 binary32))) #s(literal 1 binary32))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))))) eta) (*.f32 (neg.f32 eta) (-.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32))))

eval94.0ms (1.5%)

Memory
0.2MiB live, 190.5MiB allocated; 20ms collecting garbage
Compiler

Compiled 38 860 to 3 109 computations (92% saved)

prune28.0ms (0.5%)

Memory
-23.9MiB live, 74.4MiB allocated; 9ms collecting garbage
Pruning

19 alts after pruning (11 fresh and 8 done)

PrunedKeptTotal
New6058613
Fresh033
Picked235
Done055
Total60719626
Accuracy
99.6%
Counts
626 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
20.4%
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))) (+.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))))))
22.7%
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))) #s(literal 3 binary32))) (+.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (+.f32 (*.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))) (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))))))
91.8%
(/.f32 (*.f32 (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32))) (asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))) (+.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O)))))))))))
22.9%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
92.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))))))))
92.0%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))))))
92.0%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))))
91.7%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
88.5%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
92.0%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (+.f32 (neg.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) (*.f32 eta eta))))))
77.1%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
97.3%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
98.2%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
98.2%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
92.0%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) eta))))
98.1%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (+.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
95.0%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
87.3%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
97.9%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta)))
Compiler

Compiled 1 437 to 694 computations (51.7% saved)

series136.0ms (2.2%)

Memory
13.1MiB live, 291.9MiB allocated; 27ms collecting garbage
Counts
61 → 271
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))
(*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta)
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))))
(-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))))
#s(literal 1 binary32)
(*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))
(*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))
(/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O)))
(*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32))
(/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)
(*.f32 (/.f32 sinTheta_O eta) sinTheta_O)
(/.f32 sinTheta_O eta)
sinTheta_O
eta
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(literal 1/2 binary32)
(+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
(*.f32 eta eta)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.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 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) eta))
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) eta)
(-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
(*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
(*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(*.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))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta))
(/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta)
(+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h)
(*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)))
(*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))
(/.f32 #s(literal 1 binary32) (sin.f32 (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) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.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)))))) (/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.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)))))) (/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))
(/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32)))
(pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32))
(*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))
(/.f32 (*.f32 sinTheta_O sinTheta_O) eta)
#s(literal -1/2 binary32)
#s(literal 3 binary32)
(pow.f32 eta #s(literal 3 binary32))
(+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))
(*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))
(-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))
(*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) 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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 eta))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O))))))))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 1))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 1))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (+ 1 (* -1/4 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))))
#s(approx (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 (* 1/4 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2))))))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) #s(hole binary32 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))
#s(approx (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 2))))
#s(approx (/ (* (/ sinTheta_O eta) sinTheta_O) eta) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 2))))
#s(approx (* (/ sinTheta_O eta) sinTheta_O) #s(hole binary32 (/ (pow sinTheta_O 2) eta)))
#s(approx (/ sinTheta_O eta) #s(hole binary32 (/ sinTheta_O eta)))
#s(approx sinTheta_O #s(hole binary32 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 (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 1))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos 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 (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 eta))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/4 (/ (pow sinTheta_O 2) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/16 (/ (pow sinTheta_O 2) eta)) (* 1/4 (/ 1 eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 1))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/4 (/ (pow sinTheta_O 2) (pow eta 2))) (* 1/2 (/ 1 (pow eta 2))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/16 (/ (pow sinTheta_O 2) (pow eta 2))) (* 1/4 (/ 1 (pow eta 2))))) (* 1/2 (/ 1 (pow eta 2))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* 1/4 (/ (pow sinTheta_O 2) (pow eta 2))) (* 1/2 (/ 1 (pow eta 2)))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 3/16 (/ (pow sinTheta_O 2) (pow eta 2))) (* 1/4 (/ 1 (pow eta 2))))) (* 1/2 (/ 1 (pow eta 2)))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/32 (/ (pow sinTheta_O 2) (pow eta 2))) (* 3/16 (/ 1 (pow eta 2))))) (* 1/4 (/ 1 (pow eta 2))))) (* 1/2 (/ 1 (pow eta 2)))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 2))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) (/ 1 (pow eta 2))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (pow eta 2))) (* 1/2 (/ 1 (pow eta 2))))) (/ 1 (pow eta 2))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (pow eta 2))) (* 3/8 (/ 1 (pow eta 2))))) (* 1/2 (/ 1 (pow eta 2))))) (/ 1 (pow eta 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (* eta eta)) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 2))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ 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 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (/ h eta)))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 h))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))))
#s(approx (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 2)))))
#s(approx (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta)) #s(hole binary32 (/ (* h (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (/ 1 (sin (acos sinTheta_O))) #s(hole binary32 (/ 1 (sin (acos sinTheta_O)))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) #s(hole binary32 eta))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) #s(hole binary32 (pow eta 3)))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 3) #s(hole binary32 (* -1/8 (/ (pow sinTheta_O 6) (pow eta 3)))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) #s(hole binary32 (* -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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) #s(hole binary32 (pow eta 2)))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) #s(hole binary32 (+ (* 1/2 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ (pow sinTheta_O 2) (pow eta 2))))) (pow eta 2))))
#s(approx (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) #s(hole binary32 (* 1/4 (/ (pow sinTheta_O 4) (pow eta 2)))))
#s(approx (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) #s(hole binary32 (+ (* 1/2 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O)))))))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 (* eta (sin (acos sinTheta_O)))))))))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) (* 1/2 (/ 1 (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (* -1/4 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2))))))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (* (pow sinTheta_O 4) (- (/ 1 (pow sinTheta_O 4)) (* 1/4 (/ 1 (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2))))))))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (* (pow eta 2) (sin (acos sinTheta_O))))) (/ 1 (pow sinTheta_O 2))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1/2 (/ (* sinTheta_O (sqrt -1)) eta))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* sinTheta_O (+ (* -1/2 (/ (sqrt -1) eta)) (/ eta sinTheta_O)))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* sinTheta_O (+ (* -1/2 (/ (sqrt -1) eta)) (+ (/ 1/4 (* eta (* (pow sinTheta_O 2) (sqrt -1)))) (/ eta sinTheta_O))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* sinTheta_O (+ (* -1/2 (/ (sqrt -1) eta)) (+ (* 1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* eta (* (pow sinTheta_O 4) (sqrt -1))))) (+ (* 1/4 (/ 1 (* eta (* (pow sinTheta_O 2) (sqrt -1))))) (/ eta sinTheta_O)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1/2 (/ (* sinTheta_O (sqrt -1)) (pow eta 2)))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* sinTheta_O (- (/ 1 sinTheta_O) (* 1/2 (/ (sqrt -1) (pow eta 2)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/4 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1 sinTheta_O)) (* 1/2 (/ (sqrt -1) (pow eta 2)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (+ (/ 1 sinTheta_O) (* 1/4 (/ 1 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))) (* 1/2 (/ (sqrt -1) (pow eta 2)))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* 1/2 (/ (* sinTheta_O (sqrt -1)) (pow eta 2)))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (- (* 1/2 (/ (sqrt -1) (pow eta 2))) (* 1/4 (/ 1 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (- (+ (* -1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (* 1/2 (/ (sqrt -1) (pow eta 2)))) (/ 1/4 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (- (+ (* -1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (+ (* -1/4 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 6) (sqrt -1))))) (* 1/2 (/ (sqrt -1) (pow eta 2))))) (/ 1/4 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (* sinTheta_O (sqrt -1)) (pow eta 2))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (sqrt -1) (pow eta 2)) (* 1/2 (/ 1 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (/ (sqrt -1) (pow eta 2))) (/ 1/2 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 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 eta 2) (* (pow sinTheta_O 6) (sqrt -1))))) (/ (sqrt -1) (pow eta 2)))) (/ 1/2 (* (pow eta 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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O)))))))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h (* eta (pow sinTheta_O 2)))))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 2) (sin (acos sinTheta_O))))) (/ h (pow sinTheta_O 2))))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* 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 (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 3) (pow eta 3)) #s(hole binary32 (* -1/8 (/ (pow sinTheta_O 6) (pow eta 3)))))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) #s(hole binary32 (* 1/4 (/ (pow sinTheta_O 4) (pow eta 2)))))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) eta)) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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 (- (* 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 (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* 1/2 (/ (* sinTheta_O (sqrt -1)) eta))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (/ eta sinTheta_O)) (* -1/2 (/ (sqrt -1) eta)))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (/ (- eta (* 1/4 (/ 1 (* eta (* sinTheta_O (sqrt -1)))))) sinTheta_O)) (* -1/2 (/ (sqrt -1) eta)))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (/ (+ eta (* -1 (/ (+ (* 1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* eta (* (pow sinTheta_O 2) (sqrt -1))))) (* 1/4 (/ 1 (* eta (sqrt -1))))) sinTheta_O))) sinTheta_O)) (* -1/2 (/ (sqrt -1) eta)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* 1/2 (/ (* sinTheta_O (sqrt -1)) (pow eta 2)))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* sinTheta_O (+ (* 1/2 (/ (sqrt -1) (pow eta 2))) (/ 1 sinTheta_O)))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- 1 (* 1/4 (/ 1 (* (pow eta 2) (* sinTheta_O (sqrt -1)))))) sinTheta_O)) (* 1/2 (/ (sqrt -1) (pow eta 2))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ 1 (* -1 (/ (+ (* 1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))) (* 1/4 (/ 1 (* (pow eta 2) (sqrt -1))))) sinTheta_O))) sinTheta_O)) (* 1/2 (/ (sqrt -1) (pow eta 2))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1/2 (/ (* sinTheta_O (sqrt -1)) (pow eta 2)))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* 1/2 (/ (sqrt -1) (pow eta 2))) (* 1/4 (/ 1 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (* -1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (* 1/2 (/ (sqrt -1) (pow eta 2)))) (/ 1/4 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (* -1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (+ (* -1/4 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 6) (sqrt -1))))) (* 1/2 (/ (sqrt -1) (pow eta 2))))) (/ 1/4 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (* sinTheta_O (sqrt -1)) (pow eta 2)))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (/ (sqrt -1) (pow eta 2)) (* 1/2 (/ 1 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (/ (sqrt -1) (pow eta 2))) (/ 1/2 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 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 eta 2) (* (pow sinTheta_O 6) (sqrt -1))))) (/ (sqrt -1) (pow eta 2)))) (/ 1/2 (* (pow eta 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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ 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) (sin (acos sinTheta_O)))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (/ (* h (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (* h (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (* -1 (/ (* h (- (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) 1)) eta))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (* -1 (* h (- (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) 1)))))
#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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (/ (+ (* -1/2 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) eta)))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (/ (+ (* -1/2 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) (pow eta 2))))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (/ (- (pow eta 4) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))))
#s(approx eta #s(hole binary32 eta))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 (/ (+ (* 1/2 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) (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) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1/2 (* (/ (pow sinTheta_O 2) eta) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (/ (+ (* -1/2 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (pow eta 2)) eta)))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (- (pow eta 2) (* 1/2 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 2))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (/ (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (sin (acos sinTheta_O)))) (* (pow eta 2) h)) (pow eta 3))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (/ (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (sin (acos sinTheta_O)))) (* (pow eta 2) h)) (pow eta 2))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) #s(hole binary32 (* (pow eta 2) (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) 1)))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) 1)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (* -1 (/ (+ (* -1 h) (* -1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* 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 (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 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
33.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)))))) (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (/ (* (/ sinTheta_O eta) sinTheta_O) eta) (* (/ sinTheta_O eta) sinTheta_O) (/ sinTheta_O eta) sinTheta_O eta (sin (acos sinTheta_O)) (acos sinTheta_O) 1/2 (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 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)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* 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) (* eta eta)) (* sinTheta_O sinTheta_O) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta)) (/ 1 (sin (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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (/ (* sinTheta_O sinTheta_O) eta) -1/2 3 (pow eta 3) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))
18.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)))))) (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (/ (* (/ sinTheta_O eta) sinTheta_O) eta) (* (/ sinTheta_O eta) sinTheta_O) (/ sinTheta_O eta) sinTheta_O eta (sin (acos sinTheta_O)) (acos sinTheta_O) 1/2 (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 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)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* 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) (* eta eta)) (* sinTheta_O sinTheta_O) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta)) (/ 1 (sin (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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (/ (* sinTheta_O sinTheta_O) eta) -1/2 3 (pow eta 3) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))
16.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)))))) (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (/ (* (/ sinTheta_O eta) sinTheta_O) eta) (* (/ sinTheta_O eta) sinTheta_O) (/ sinTheta_O eta) sinTheta_O eta (sin (acos sinTheta_O)) (acos sinTheta_O) 1/2 (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 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)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* 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) (* eta eta)) (* sinTheta_O sinTheta_O) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta)) (/ 1 (sin (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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (/ (* sinTheta_O sinTheta_O) eta) -1/2 3 (pow eta 3) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))
15.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)))))) (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (/ (* (/ sinTheta_O eta) sinTheta_O) eta) (* (/ sinTheta_O eta) sinTheta_O) (/ sinTheta_O eta) sinTheta_O eta (sin (acos sinTheta_O)) (acos sinTheta_O) 1/2 (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 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)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* 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) (* eta eta)) (* sinTheta_O sinTheta_O) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta)) (/ 1 (sin (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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (/ (* sinTheta_O sinTheta_O) eta) -1/2 3 (pow eta 3) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))
13.0ms
eta
@-inf
((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (/ (* (/ sinTheta_O eta) sinTheta_O) eta) (* (/ sinTheta_O eta) sinTheta_O) (/ sinTheta_O eta) sinTheta_O eta (sin (acos sinTheta_O)) (acos sinTheta_O) 1/2 (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 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)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* 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) (* eta eta)) (* sinTheta_O sinTheta_O) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta)) (/ 1 (sin (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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (/ (* sinTheta_O sinTheta_O) eta) -1/2 3 (pow eta 3) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))

rewrite226.0ms (3.7%)

Memory
17.4MiB live, 351.2MiB allocated; 40ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0140113927
0149311021
1797910775
0801010775
Stop Event
iter limit
node limit
iter limit
Counts
332 → 526
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))
(*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta)
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))))
(-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))))
#s(literal 1 binary32)
(*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))
(*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))
(/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O)))
(*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32))
(/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)
(*.f32 (/.f32 sinTheta_O eta) sinTheta_O)
(/.f32 sinTheta_O eta)
sinTheta_O
eta
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(literal 1/2 binary32)
(+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
(*.f32 eta eta)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.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 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) eta))
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) eta)
(-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
(*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
(*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(*.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))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta))
(/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta)
(+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h)
(*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)))
(*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))
(/.f32 #s(literal 1 binary32) (sin.f32 (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) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.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)))))) (/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.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)))))) (/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))
(/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32)))
(pow.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32))
(*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))
(/.f32 (*.f32 sinTheta_O sinTheta_O) eta)
#s(literal -1/2 binary32)
#s(literal 3 binary32)
(pow.f32 eta #s(literal 3 binary32))
(+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))
(*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)))
(-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))
(*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) 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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 eta))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O))))))))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 1))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 1))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (+ 1 (* -1/4 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))))
#s(approx (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 (* 1/4 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2))))))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) #s(hole binary32 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))
#s(approx (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 2))))
#s(approx (/ (* (/ sinTheta_O eta) sinTheta_O) eta) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 2))))
#s(approx (* (/ sinTheta_O eta) sinTheta_O) #s(hole binary32 (/ (pow sinTheta_O 2) eta)))
#s(approx (/ sinTheta_O eta) #s(hole binary32 (/ sinTheta_O eta)))
#s(approx sinTheta_O #s(hole binary32 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 (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 1))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos 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 (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 eta))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/4 (/ (pow sinTheta_O 2) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/16 (/ (pow sinTheta_O 2) eta)) (* 1/4 (/ 1 eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 1))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/4 (/ (pow sinTheta_O 2) (pow eta 2))) (* 1/2 (/ 1 (pow eta 2))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/16 (/ (pow sinTheta_O 2) (pow eta 2))) (* 1/4 (/ 1 (pow eta 2))))) (* 1/2 (/ 1 (pow eta 2))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* 1/4 (/ (pow sinTheta_O 2) (pow eta 2))) (* 1/2 (/ 1 (pow eta 2)))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 3/16 (/ (pow sinTheta_O 2) (pow eta 2))) (* 1/4 (/ 1 (pow eta 2))))) (* 1/2 (/ 1 (pow eta 2)))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/32 (/ (pow sinTheta_O 2) (pow eta 2))) (* 3/16 (/ 1 (pow eta 2))))) (* 1/4 (/ 1 (pow eta 2))))) (* 1/2 (/ 1 (pow eta 2)))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 2))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) (/ 1 (pow eta 2))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (pow eta 2))) (* 1/2 (/ 1 (pow eta 2))))) (/ 1 (pow eta 2))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (pow eta 2))) (* 3/8 (/ 1 (pow eta 2))))) (* 1/2 (/ 1 (pow eta 2))))) (/ 1 (pow eta 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (* eta eta)) #s(hole binary32 (/ (pow sinTheta_O 2) (pow eta 2))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ 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 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (/ h eta)))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 h))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))))
#s(approx (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 2)))))
#s(approx (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta)) #s(hole binary32 (/ (* h (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (/ 1 (sin (acos sinTheta_O))) #s(hole binary32 (/ 1 (sin (acos sinTheta_O)))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) #s(hole binary32 eta))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) #s(hole binary32 (pow eta 3)))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 3) #s(hole binary32 (* -1/8 (/ (pow sinTheta_O 6) (pow eta 3)))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) #s(hole binary32 (* -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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) #s(hole binary32 (pow eta 2)))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) #s(hole binary32 (+ (* 1/2 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ (pow sinTheta_O 2) (pow eta 2))))) (pow eta 2))))
#s(approx (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) #s(hole binary32 (* 1/4 (/ (pow sinTheta_O 4) (pow eta 2)))))
#s(approx (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) #s(hole binary32 (+ (* 1/2 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) (* eta (sin (acos sinTheta_O)))))))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 (* eta (sin (acos sinTheta_O)))))))))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) (* 1/2 (/ 1 (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (* -1/4 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2))))))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (* (pow sinTheta_O 4) (- (/ 1 (pow sinTheta_O 4)) (* 1/4 (/ 1 (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2))))))))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (* (pow eta 2) (sin (acos sinTheta_O))))) (/ 1 (pow sinTheta_O 2))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1/2 (/ (* sinTheta_O (sqrt -1)) eta))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* sinTheta_O (+ (* -1/2 (/ (sqrt -1) eta)) (/ eta sinTheta_O)))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* sinTheta_O (+ (* -1/2 (/ (sqrt -1) eta)) (+ (/ 1/4 (* eta (* (pow sinTheta_O 2) (sqrt -1)))) (/ eta sinTheta_O))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* sinTheta_O (+ (* -1/2 (/ (sqrt -1) eta)) (+ (* 1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* eta (* (pow sinTheta_O 4) (sqrt -1))))) (+ (* 1/4 (/ 1 (* eta (* (pow sinTheta_O 2) (sqrt -1))))) (/ eta sinTheta_O)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1/2 (/ (* sinTheta_O (sqrt -1)) (pow eta 2)))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* sinTheta_O (- (/ 1 sinTheta_O) (* 1/2 (/ (sqrt -1) (pow eta 2)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/4 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1 sinTheta_O)) (* 1/2 (/ (sqrt -1) (pow eta 2)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (+ (/ 1 sinTheta_O) (* 1/4 (/ 1 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))) (* 1/2 (/ (sqrt -1) (pow eta 2)))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* 1/2 (/ (* sinTheta_O (sqrt -1)) (pow eta 2)))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (- (* 1/2 (/ (sqrt -1) (pow eta 2))) (* 1/4 (/ 1 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (- (+ (* -1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (* 1/2 (/ (sqrt -1) (pow eta 2)))) (/ 1/4 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (- (+ (* -1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (+ (* -1/4 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 6) (sqrt -1))))) (* 1/2 (/ (sqrt -1) (pow eta 2))))) (/ 1/4 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (* sinTheta_O (sqrt -1)) (pow eta 2))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (sqrt -1) (pow eta 2)) (* 1/2 (/ 1 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (/ (sqrt -1) (pow eta 2))) (/ 1/2 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 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 eta 2) (* (pow sinTheta_O 6) (sqrt -1))))) (/ (sqrt -1) (pow eta 2)))) (/ 1/2 (* (pow eta 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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O)))))))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h (* eta (pow sinTheta_O 2)))))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 2) (sin (acos sinTheta_O))))) (/ h (pow sinTheta_O 2))))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* 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 (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 3) (pow eta 3)) #s(hole binary32 (* -1/8 (/ (pow sinTheta_O 6) (pow eta 3)))))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) #s(hole binary32 (* 1/4 (/ (pow sinTheta_O 4) (pow eta 2)))))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) eta)) #s(hole binary32 (* 1/2 (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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 (- (* 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 (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* 1/2 (/ (* sinTheta_O (sqrt -1)) eta))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (/ eta sinTheta_O)) (* -1/2 (/ (sqrt -1) eta)))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (/ (- eta (* 1/4 (/ 1 (* eta (* sinTheta_O (sqrt -1)))))) sinTheta_O)) (* -1/2 (/ (sqrt -1) eta)))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (/ (+ eta (* -1 (/ (+ (* 1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* eta (* (pow sinTheta_O 2) (sqrt -1))))) (* 1/4 (/ 1 (* eta (sqrt -1))))) sinTheta_O))) sinTheta_O)) (* -1/2 (/ (sqrt -1) eta)))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* 1/2 (/ (* sinTheta_O (sqrt -1)) (pow eta 2)))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* sinTheta_O (+ (* 1/2 (/ (sqrt -1) (pow eta 2))) (/ 1 sinTheta_O)))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- 1 (* 1/4 (/ 1 (* (pow eta 2) (* sinTheta_O (sqrt -1)))))) sinTheta_O)) (* 1/2 (/ (sqrt -1) (pow eta 2))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ 1 (* -1 (/ (+ (* 1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))) (* 1/4 (/ 1 (* (pow eta 2) (sqrt -1))))) sinTheta_O))) sinTheta_O)) (* 1/2 (/ (sqrt -1) (pow eta 2))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1/2 (/ (* sinTheta_O (sqrt -1)) (pow eta 2)))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* 1/2 (/ (sqrt -1) (pow eta 2))) (* 1/4 (/ 1 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (* -1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (* 1/2 (/ (sqrt -1) (pow eta 2)))) (/ 1/4 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (* -1/4 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (+ (* -1/4 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 6) (sqrt -1))))) (* 1/2 (/ (sqrt -1) (pow eta 2))))) (/ 1/4 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (* sinTheta_O (sqrt -1)) (pow eta 2)))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (/ (sqrt -1) (pow eta 2)) (* 1/2 (/ 1 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 2) (* (pow sinTheta_O 4) (sqrt -1))))) (/ (sqrt -1) (pow eta 2))) (/ 1/2 (* (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow eta 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 eta 2) (* (pow sinTheta_O 6) (sqrt -1))))) (/ (sqrt -1) (pow eta 2)))) (/ 1/2 (* (pow eta 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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ 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) (sin (acos sinTheta_O)))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (/ (* h (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (* h (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (* -1 (/ (* h (- (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) 1)) eta))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (* -1 (* h (- (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) 1)))))
#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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (/ (+ (* -1/2 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) eta)))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (/ (+ (* -1/2 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) (pow eta 2))))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(hole binary32 (/ (- (pow eta 4) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))))
#s(approx eta #s(hole binary32 eta))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(hole binary32 (/ (+ (* 1/2 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) (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) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1/2 (* (/ (pow sinTheta_O 2) eta) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (/ (+ (* -1/2 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (pow eta 2)) eta)))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (- (pow eta 2) (* 1/2 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (pow eta 2))))
#s(approx (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (/ (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (sin (acos sinTheta_O)))) (* (pow eta 2) h)) (pow eta 3))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) #s(hole binary32 (/ (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (sin (acos sinTheta_O)))) (* (pow eta 2) h)) (pow eta 2))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) #s(hole binary32 (* (pow eta 2) (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) 1)))))
#s(approx (* (- 1 (* 1/2 (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) 1)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) #s(hole binary32 (* -1 (/ (+ (* -1 h) (* -1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* 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 (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (*.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)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (*.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))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (*.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))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (*.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)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (*.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))
(*.f32 (+.f32 (*.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)
(*.f32 eta (+.f32 (*.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 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32))) eta) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(+.f32 (*.f32 #s(literal 1 binary32) eta) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) eta))
(+.f32 (*.f32 eta #s(literal 1 binary32)) (*.f32 eta (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) (*.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))))
(/.f32 (neg.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)))) (neg.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(-.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) (/.f32 (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))))
(-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
(+.f32 (*.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 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)))) (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32))))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 (*.f32 (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32))) (*.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32))))))
(-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)))
(+.f32 #s(literal 1 binary32) (*.f32 (neg.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) (*.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 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32))
(*.f32 (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/4 binary32))
(*.f32 (neg.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) (neg.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(*.f32 (fabs.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) (fabs.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
(*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32))
(*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))
(*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
(*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O)))
(*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O)))
(*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
(/.f32 (neg.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta))) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (sin.f32 (acos.f32 sinTheta_O)))
(/.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) #s(literal 1 binary32))
(*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta))
(*.f32 #s(literal 1 binary32) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
(*.f32 sinTheta_O (/.f32 sinTheta_O (*.f32 eta eta)))
(/.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1 binary32)) eta)
(/.f32 (neg.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) (neg.f32 eta))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 (*.f32 eta eta)))
(/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) #s(literal 1 binary32))
(*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta))
(*.f32 #s(literal 1 binary32) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
(*.f32 sinTheta_O (/.f32 sinTheta_O (*.f32 eta eta)))
(/.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1 binary32)) eta)
(/.f32 (neg.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) (neg.f32 eta))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 (*.f32 eta eta)))
(/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(*.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)
(/.f32 (neg.f32 sinTheta_O) (neg.f32 eta))
(/.f32 sinTheta_O eta)
sinTheta_O
eta
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (acos.f32 sinTheta_O))
(cos.f32 (asin.f32 sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (asin.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(literal 1/2 binary32)
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32))) (+.f32 (*.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 #s(literal 1 binary32) (*.f32 (neg.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)))
(-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
(+.f32 (*.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 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))))
(sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))
(pow.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)) #s(literal 1/2 binary32))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 eta eta)
(pow.f32 eta #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (*.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)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (*.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))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (*.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))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (*.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 (*.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))
(*.f32 (+.f32 (*.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)
(*.f32 eta (+.f32 (*.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 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32))) eta) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(+.f32 (*.f32 #s(literal 1 binary32) eta) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) eta))
(+.f32 (*.f32 eta #s(literal 1 binary32)) (*.f32 eta (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)) (*.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) (*.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))))
(/.f32 (neg.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)))) (neg.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32))) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
(-.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) (/.f32 (pow.f32 (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 2 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))))
(-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
(+.f32 (*.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 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
(*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))
(*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
(*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O)))
(*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O)))
(*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
(/.f32 (neg.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta))) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (sin.f32 (acos.f32 sinTheta_O)))
(/.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) #s(literal 1 binary32))
(*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta))
(*.f32 #s(literal 1 binary32) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
(*.f32 sinTheta_O (/.f32 sinTheta_O (*.f32 eta eta)))
(/.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1 binary32)) eta)
(/.f32 (neg.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) (neg.f32 eta))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 (*.f32 eta eta)))
(/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta)
(/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))
(*.f32 (pow.f32 sinTheta_O #s(literal 1 binary32)) (pow.f32 sinTheta_O #s(literal 1 binary32)))
(*.f32 (neg.f32 sinTheta_O) (neg.f32 sinTheta_O))
(*.f32 (fabs.f32 sinTheta_O) (fabs.f32 sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32))
(pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal -1 binary32))
(cosh.f32 (neg.f32 (atanh.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(cosh.f32 (atanh.f32 (neg.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 (fabs.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 sinTheta_O))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (acos.f32 sinTheta_O))
(cos.f32 (asin.f32 sinTheta_O))
(*.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32))
(*.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (*.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
(+.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) h) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) h) eta))
(/.f32 (neg.f32 (+.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) h)) (neg.f32 eta))
(/.f32 (+.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) h) eta)
(+.f32 (/.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) eta) (/.f32 h eta))
(+.f32 (/.f32 h eta) (/.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) eta))
(/.f32 (-.f32 (*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)))) (*.f32 h h)) (-.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) h))
(/.f32 (-.f32 (*.f32 h h) (*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))))) (-.f32 h (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)))))
(/.f32 (+.f32 (pow.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) #s(literal 3 binary32)) (pow.f32 h #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)))) (-.f32 (*.f32 h h) (*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) h))))
(/.f32 (+.f32 (pow.f32 h #s(literal 3 binary32)) (pow.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) #s(literal 3 binary32))) (+.f32 (*.f32 h h) (-.f32 (*.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)))) (*.f32 h (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)))))))
(-.f32 h (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 h (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) eta) (cosh.f32 (atanh.f32 sinTheta_O)))))
(+.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) h)
(+.f32 h (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))))
(*.f32 (*.f32 (/.f32 (*.f32 h (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) eta) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))
(*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)))
(*.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))
(*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 h (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) eta) (cosh.f32 (atanh.f32 sinTheta_O))))
(/.f32 (*.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O)))
(*.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
(*.f32 (/.f32 (*.f32 h (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) eta) #s(literal 1/2 binary32))
(*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 h (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) eta))
(/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))
(*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) h)
(*.f32 h (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
(/.f32 (*.f32 h (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) eta)
(/.f32 (neg.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (neg.f32 (*.f32 eta eta)))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32))
(pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal -1 binary32))
(cosh.f32 (neg.f32 (atanh.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(cosh.f32 (atanh.f32 (neg.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 (fabs.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 sinTheta_O))
(-.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)))))) (/.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 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))))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 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 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 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 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 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))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 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 (neg.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 binary32)))) (neg.f32 (+.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 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 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 (/.f32 (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 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 (pow.f32 eta #s(literal 3 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 (+.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 #s(literal 1/2 binary32) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O))))
(/.f32 (-.f32 (*.f32 (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 binary32)) (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 binary32))) (pow.f32 eta #s(literal 6 binary32))) (-.f32 (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 binary32)) (pow.f32 eta #s(literal 3 binary32))))
(/.f32 (+.f32 (pow.f32 (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 binary32)) #s(literal 3 binary32)) (pow.f32 (pow.f32 eta #s(literal 3 binary32)) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 binary32)) (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 binary32))) (-.f32 (pow.f32 eta #s(literal 6 binary32)) (*.f32 (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 binary32)) (pow.f32 eta #s(literal 3 binary32))))))
(+.f32 (pow.f32 eta #s(literal 3 binary32)) (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 binary32)))
(+.f32 (*.f32 (pow.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 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 sinTheta_O eta) sinTheta_O) #s(literal 3 binary32)) #s(literal -1/8 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)))
(pow.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 #s(literal -1/2 binary32) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O))
(/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)
(*.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)
#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))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 3 binary32)))
(/.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))) (+.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 (*.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 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) #s(literal 2 binary32)) (*.f32 eta eta)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 #s(literal -1/2 binary32) eta)))
(+.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 (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 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) #s(literal -1/2 binary32))
(*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) #s(literal 1/4 binary32))
(*.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 (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 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 #s(literal -1/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)) (*.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 (pow.f32 eta #s(literal 4 binary32)) (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 #s(literal -1/2 binary32) eta)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 #s(literal -1/2 binary32) eta)))) (+.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 #s(literal -1/2 binary32) eta))))
(/.f32 (-.f32 (pow.f32 (*.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 #s(literal -1/2 binary32) eta)) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (+.f32 (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 #s(literal -1/2 binary32) eta)) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 #s(literal -1/2 binary32) eta))) (*.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 #s(literal -1/2 binary32) eta))))))
(-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (*.f32 #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 sinTheta_O eta) sinTheta_O) (*.f32 #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)))
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (pow.f32 eta #s(literal 3 binary32))) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (+.f32 (*.f32 (*.f32 eta h) (*.f32 (-.f32 (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32)) (*.f32 #s(literal -3/4 binary32) (pow.f32 eta #s(literal -6 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) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (+.f32 (*.f32 (*.f32 eta h) (*.f32 (-.f32 (-.f32 (-.f32 (*.f32 #s(literal 3/8 binary32) (pow.f32 eta #s(literal -4 binary32))) (*.f32 #s(literal -1/2 binary32) (pow.f32 eta #s(literal -6 binary32)))) (neg.f32 (/.f32 (+.f32 (pow.f32 eta #s(literal -6 binary32)) (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)))) (*.f32 (/.f32 (-.f32 (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32)) (*.f32 #s(literal -3/4 binary32) (pow.f32 eta #s(literal -6 binary32)))) (*.f32 eta eta)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O))) (*.f32 (*.f32 eta h) (-.f32 (*.f32 (pow.f32 eta #s(literal -4 binary32)) #s(literal 1/2 binary32)) (*.f32 #s(literal -3/4 binary32) (pow.f32 eta #s(literal -6 binary32))))))) (*.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)))))) (-.f32 eta (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (-.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (+.f32 (*.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)))))) (+.f32 (*.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.f32 (/.f32 (*.f32 (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (+.f32 (*.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32)) #s(literal 1/2 binary32))) (*.f32 eta eta)) #s(literal 3/8 binary32)) (*.f32 sinTheta_O sinTheta_O)) eta) (/.f32 (+.f32 (*.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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) eta)
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (-.f32 eta (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(literal 1 binary32))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+.f32 (*.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 (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(literal 1 binary32))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 1/4 binary32))))
#s(approx (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) (*.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/4 binary32)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
#s(approx (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
#s(approx (* (/ sinTheta_O eta) sinTheta_O) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O))
#s(approx (/ sinTheta_O eta) (/.f32 sinTheta_O eta))
#s(approx sinTheta_O 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 (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) #s(literal 1 binary32))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+.f32 (*.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))))) (+.f32 (*.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 eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) eta)
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (-.f32 eta (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O))))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (+.f32 (*.f32 (-.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/4 binary32)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O)) eta))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (+.f32 (*.f32 (-.f32 (*.f32 (-.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -3/16 binary32)) (/.f32 #s(literal 1/4 binary32) eta)) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O)) eta))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) #s(literal 1 binary32))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta))))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+.f32 (*.f32 (-.f32 (/.f32 (*.f32 #s(literal -1/4 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (*.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+.f32 (*.f32 (-.f32 (*.f32 (-.f32 (/.f32 (*.f32 #s(literal -3/16 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (*.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (*.f32 (-.f32 (/.f32 (*.f32 #s(literal 1/4 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (*.f32 #s(literal -1/2 binary32) (pow.f32 eta #s(literal -2 binary32)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (*.f32 (-.f32 (*.f32 (-.f32 (/.f32 (*.f32 #s(literal 3/16 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (*.f32 #s(literal -1/4 binary32) (pow.f32 eta #s(literal -2 binary32)))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 #s(literal -1/2 binary32) (pow.f32 eta #s(literal -2 binary32)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (*.f32 (-.f32 (*.f32 (-.f32 (*.f32 (-.f32 (/.f32 (*.f32 #s(literal 5/32 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (*.f32 #s(literal -3/16 binary32) (pow.f32 eta #s(literal -2 binary32)))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 #s(literal -1/4 binary32) (pow.f32 eta #s(literal -2 binary32)))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 #s(literal -1/2 binary32) (pow.f32 eta #s(literal -2 binary32)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (+.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (pow.f32 eta #s(literal -2 binary32))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (+.f32 (*.f32 (-.f32 (/.f32 (*.f32 #s(literal 3/8 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (*.f32 #s(literal -1/2 binary32) (pow.f32 eta #s(literal -2 binary32)))) (*.f32 sinTheta_O sinTheta_O)) (pow.f32 eta #s(literal -2 binary32))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (+.f32 (*.f32 (-.f32 (*.f32 (-.f32 (/.f32 (*.f32 #s(literal 5/16 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) (*.f32 #s(literal -3/8 binary32) (pow.f32 eta #s(literal -2 binary32)))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 #s(literal -1/2 binary32) (pow.f32 eta #s(literal -2 binary32)))) (*.f32 sinTheta_O sinTheta_O)) (pow.f32 eta #s(literal -2 binary32))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)))
#s(approx (* sinTheta_O sinTheta_O) (*.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)))) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (+.f32 (*.f32 (-.f32 #s(literal 1/2 binary32) (*.f32 #s(literal -3/8 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (+.f32 (*.f32 (+.f32 (*.f32 (+.f32 (*.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 (sin (acos sinTheta_O)) #s(literal 1 binary32))
#s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))))
#s(approx (sin (acos sinTheta_O)) (+.f32 (*.f32 (-.f32 (*.f32 #s(literal -1/8 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)))
#s(approx (sin (acos sinTheta_O)) (+.f32 (*.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -1/16 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/8 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32)) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(literal 1 binary32))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) (+.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32)))
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (asin.f32 (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (-.f32 (*.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 #s(literal -1/2 binary32) (/.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (+.f32 (*.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 (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (/.f32 h eta))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (+.f32 (*.f32 (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) (/.f32 h eta)))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) h)
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (+.f32 (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h))
#s(approx (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)))
#s(approx (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)))
#s(approx (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta)) (/.f32 (*.f32 h (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) eta))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (cosh.f32 (atanh.f32 sinTheta_O)))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) eta)
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (-.f32 eta (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O))))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (pow.f32 eta #s(literal 3 binary32)))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) #s(literal -1/8 binary32)) (pow.f32 eta #s(literal 3 binary32))) (pow.f32 eta #s(literal 3 binary32))))
#s(approx (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (* (/ sinTheta_O eta) sinTheta_O) (*.f32 (/.f32 sinTheta_O eta) sinTheta_O))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (*.f32 eta eta))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (+.f32 (*.f32 (-.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 #s(literal -1/4 binary32) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta))) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)))
#s(approx (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (/.f32 (*.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) eta) -1/2) eta)) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))))
#s(approx (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (+.f32 (*.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) (sin (acos sinTheta_O)))))) (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32))))) (*.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) (sin (acos sinTheta_O)))))) (+.f32 (*.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 (+.f32 (+.f32 (/.f32 (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32))) (*.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))) h)) #s(literal -1/2 binary32)) (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) (sqrt.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 5 binary32))) (sqrt.f32 #s(literal -1 binary32))))) (*.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 (+.f32 (*.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 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) (*.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))) (*.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)))))) sinTheta_O))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) (*.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)))))) (+.f32 (*.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)) (*.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))))))) sinTheta_O))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1/2 binary32)))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (-.f32 (/.f32 eta (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) eta))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (*.f32 (/.f32 (pow.f32 eta #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (*.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/4 binary32)))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (*.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -4 binary32)) (*.f32 (/.f32 (pow.f32 eta #s(literal -4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 1/4 binary32))) (pow.f32 sinTheta_O #s(literal 4 binary32))))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) (*.f32 (+.f32 (*.f32 (/.f32 (pow.f32 eta #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (pow.f32 sinTheta_O #s(literal -2 binary32))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (/.f32 (*.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (sqrt.f32 #s(literal -1 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 (+.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (*.f32 eta eta) sinTheta_O)) (/.f32 #s(literal 3/8 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (/.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) eta) #s(literal -1/2 binary32)))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (+.f32 (/.f32 eta sinTheta_O) (*.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) eta) #s(literal -1/2 binary32))) sinTheta_O))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (+.f32 (+.f32 (*.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) eta) #s(literal -1/2 binary32)) (/.f32 (/.f32 #s(literal 1/4 binary32) eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O)))) (/.f32 eta sinTheta_O)) sinTheta_O))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (+.f32 (+.f32 (*.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) eta) #s(literal -1/2 binary32)) (/.f32 #s(literal 3/16 binary32) (*.f32 (*.f32 eta (pow.f32 sinTheta_O #s(literal 4 binary32))) (sqrt.f32 #s(literal -1 binary32))))) (+.f32 (/.f32 (/.f32 #s(literal 1/4 binary32) eta) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (/.f32 eta sinTheta_O))) sinTheta_O))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 eta eta)))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (*.f32 (-.f32 (/.f32 #s(literal 1 binary32) sinTheta_O) (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta))) sinTheta_O))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (*.f32 (+.f32 (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (-.f32 (/.f32 #s(literal 1 binary32) sinTheta_O) (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta)))) sinTheta_O))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) sinTheta_O)) (/.f32 #s(literal 3/16 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 eta eta)))) (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta))) sinTheta_O))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 eta eta)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (*.f32 (-.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta)) (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (*.f32 (-.f32 (+.f32 (/.f32 #s(literal -3/16 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 eta eta))) (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta))) (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/32 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.f32 eta eta))) (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta))) (/.f32 #s(literal -3/16 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 eta eta)))) (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (/.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) (*.f32 eta eta)))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (-.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (-.f32 (+.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 eta eta))) (/.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 eta eta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.f32 eta eta))) (/.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 eta eta))) (/.f32 #s(literal -3/8 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 eta eta)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (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 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (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 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 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 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 #s(literal 3/8 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))) (/.f32 #s(literal -5/16 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 6 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 (sin (acos sinTheta_O)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (sin (acos sinTheta_O)) (*.f32 (+.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (sin (acos sinTheta_O)) (*.f32 (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (sin (acos sinTheta_O)) (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1/16 binary32) (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) (pow.f32 sinTheta_O #s(literal 6 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) (sin (acos sinTheta_O)))))) (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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)))) sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (+.f32 (*.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)))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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))))) sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (+.f32 (*.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)))) (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (+.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32))) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (+.f32 (*.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))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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))))) sinTheta_O))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (*.f32 (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (*.f32 (+.f32 (/.f32 h (*.f32 (*.f32 sinTheta_O sinTheta_O) eta)) (/.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)))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (*.f32 (+.f32 (/.f32 h (*.f32 sinTheta_O sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* 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 (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* 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)))) (+.f32 (/.f32 (neg.f32 eta) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (*.f32 (-.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)) (/.f32 (*.f32 #s(literal -2 binary32) (pow.f32 eta #s(literal 3 binary32))) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (+.f32 (+.f32 (/.f32 (*.f32 (pow.f32 eta #s(literal 3 binary32)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 #s(literal 1/2 binary32) eta)) (/.f32 (neg.f32 eta) (*.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (*.f32 (-.f32 (*.f32 (pow.f32 eta #s(literal -2 binary32)) #s(literal 1/4 binary32)) (*.f32 #s(literal -1/2 binary32) (pow.f32 sinTheta_O #s(literal -2 binary32)))) (pow.f32 sinTheta_O #s(literal 4 binary32))))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (*.f32 (+.f32 (+.f32 (/.f32 (*.f32 eta eta) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.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 (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)))
#s(approx (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (+.f32 (*.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) (sin (acos sinTheta_O)))))) (+.f32 (+.f32 (*.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 (*.f32 #s(literal 1/2 binary32) (*.f32 (+.f32 (/.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) (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) (sin (acos sinTheta_O)))))) (+.f32 (neg.f32 (/.f32 (+.f32 (*.f32 (*.f32 h (*.f32 (+.f32 (*.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)) (+.f32 (/.f32 (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) (*.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32))) (*.f32 (/.f32 (*.f32 eta eta) #s(literal 1 binary32)) #s(literal 1/2 binary32)))) (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (*.f32 (sqrt.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 (+.f32 (/.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) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) h)) #s(literal -1/2 binary32))) (pow.f32 sinTheta_O #s(literal 3 binary32)))) (+.f32 (*.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 (+.f32 (*.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 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O)) (*.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))) (*.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)))))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 (+.f32 (+.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O)) (neg.f32 (/.f32 (+.f32 (*.f32 (sqrt.f32 (/.f32 sinTheta_O (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) #s(literal 1/4 binary32)) (*.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)))))) (pow.f32 sinTheta_O #s(literal 3 binary32))))) (*.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)))))) 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 (+.f32 (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)) (*.f32 eta eta)) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (/.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) eta) #s(literal 1/2 binary32)))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (neg.f32 (*.f32 (-.f32 (/.f32 (neg.f32 eta) sinTheta_O) (*.f32 #s(literal 1/2 binary32) (/.f32 (sqrt.f32 #s(literal -1 binary32)) eta))) sinTheta_O)))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (-.f32 eta (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O) eta))) sinTheta_O)) (*.f32 #s(literal 1/2 binary32) (/.f32 (sqrt.f32 #s(literal -1 binary32)) eta))) sinTheta_O)))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (+.f32 (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/4 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) eta)) (/.f32 #s(literal 3/16 binary32) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) eta) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)) eta) sinTheta_O)) (*.f32 #s(literal 1/2 binary32) (/.f32 (sqrt.f32 #s(literal -1 binary32)) eta))) sinTheta_O)))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 eta eta)))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (*.f32 (+.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) sinTheta_O)) sinTheta_O))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (pow.f32 eta #s(literal -2 binary32)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) #s(literal 1/4 binary32))) sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta))) sinTheta_O)))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 (+.f32 (neg.f32 (/.f32 (*.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (pow.f32 eta #s(literal -2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)) #s(literal 1 binary32)) sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta))) sinTheta_O)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 eta eta)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (neg.f32 (*.f32 (-.f32 (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta)) (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (neg.f32 (*.f32 (-.f32 (+.f32 (/.f32 #s(literal -3/16 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 eta eta))) (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta))) (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (neg.f32 (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/32 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.f32 eta eta))) (/.f32 (*.f32 #s(literal 1/2 binary32) (sqrt.f32 #s(literal -1 binary32))) (*.f32 eta eta))) (/.f32 #s(literal -3/16 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 eta eta)))) (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (/.f32 (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 eta eta)))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (neg.f32 (*.f32 (-.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 eta eta)) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (neg.f32 (*.f32 (-.f32 (+.f32 (/.f32 #s(literal -3/8 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 eta eta))) (/.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 eta eta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (neg.f32 (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 #s(literal -5/16 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.f32 eta eta))) (/.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 eta eta))) (/.f32 #s(literal -3/8 binary32) (*.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))) (*.f32 eta eta)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (*.f32 eta sinTheta_O) #s(literal 2 binary32)) (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 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (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 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 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 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (+.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 #s(literal 3/8 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))) (/.f32 #s(literal -5/16 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) (pow.f32 sinTheta_O #s(literal 6 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 (sin (acos sinTheta_O)) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sin (acos sinTheta_O)) (neg.f32 (*.f32 (+.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (sin (acos sinTheta_O)) (neg.f32 (*.f32 (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 (/.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (sin (acos sinTheta_O)) (neg.f32 (*.f32 (-.f32 (+.f32 (+.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) #s(literal 1/2 binary32)) (sqrt.f32 #s(literal -1 binary32))) (sqrt.f32 #s(literal -1 binary32))) (/.f32 #s(literal 1/16 binary32) (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) (pow.f32 sinTheta_O #s(literal 6 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) (sin (acos sinTheta_O)))))) (neg.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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)))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (+.f32 (*.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)))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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))))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (+.f32 (*.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)))) (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 6 binary32))) (/.f32 (+.f32 (*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32))) (*.f32 (/.f32 (*.f32 (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (+.f32 (*.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))) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))))) (+.f32 (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) h)) (*.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))))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))))) h))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (*.f32 h (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) eta)))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) h))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (/.f32 (*.f32 (neg.f32 h) (-.f32 (*.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 (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (*.f32 (neg.f32 h) (-.f32 (*.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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos 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) (sin (acos sinTheta_O)))))) (+.f32 (*.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) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (-.f32 (*.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) (-.f32 (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 #s(literal -1/4 binary32) (*.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)) #s(literal -1 binary32)) (cosh.f32 (atanh.f32 sinTheta_O)))))) (sqrt.f32 #s(literal -1 binary32))))) (*.f32 #s(literal -1/2 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)))) (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 (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) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.f32 (*.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (-.f32 (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 #s(literal -1/4 binary32) (*.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)) #s(literal -1 binary32)) (cosh.f32 (atanh.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) (-.f32 (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)))) (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) (/.f32 (*.f32 (-.f32 (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 #s(literal -1/4 binary32) (*.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)) #s(literal -1 binary32)) (cosh.f32 (atanh.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)))))) (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)))))) (+.f32 (*.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)))))) (+.f32 (*.f32 (+.f32 (*.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)) (*.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)))))) (+.f32 (*.f32 (+.f32 (*.f32 (+.f32 (*.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 (*.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)) (*.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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (/.f32 (+.f32 (*.f32 (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32)) (*.f32 eta eta)) eta))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (/.f32 (+.f32 (*.f32 (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O))) #s(literal -1/2 binary32)) (*.f32 eta eta)) (*.f32 eta eta)))
#s(approx (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 1/4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))) (pow.f32 eta #s(literal 4 binary32))))
#s(approx eta eta)
#s(approx (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2)) (/.f32 (+.f32 (*.f32 (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (/.f32 (+.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 eta eta)) eta))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (/.f32 (+.f32 (*.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 eta eta)) (*.f32 eta eta)))
#s(approx (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.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 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.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))) (*.f32 (*.f32 (*.f32 eta eta) (/.f32 (*.f32 (*.f32 h sinTheta_O) (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.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)))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (*.f32 eta eta)) (*.f32 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (+.f32 (*.f32 (+.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (+.f32 (*.f32 (/.f32 (*.f32 (*.f32 h sinTheta_O) (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.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)))) (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) (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))) (*.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (+.f32 (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))) (*.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))) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 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 (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (/.f32 (+.f32 (*.f32 (*.f32 h (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) h)) (pow.f32 eta #s(literal 3 binary32))))
#s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (/.f32 (+.f32 (*.f32 (*.f32 h (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) h)) (*.f32 eta eta)))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (/.f32 (+.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) eta))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (/.f32 (+.f32 (*.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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (/.f32 (+.f32 (*.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) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (/.f32 (+.f32 (*.f32 (-.f32 (*.f32 eta eta) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))) (*.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) eta) -1/2) eta)) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.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 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)))) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (+.f32 (*.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))) (-.f32 (*.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 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 h (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) eta) (cosh.f32 (atanh.f32 sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (+.f32 (*.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 (+.f32 (*.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 (+.f32 (+.f32 (*.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))))) (*.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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (+.f32 (*.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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (+.f32 (neg.f32 (*.f32 (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (+.f32 (*.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 (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+.f32 (*.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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32))) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32))) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (+.f32 h (*.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 (-.f32 (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (*.f32 #s(literal 1/2 binary32) (*.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)))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32)) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal -1/2 binary32)))) eta))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (/.f32 (+.f32 (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (*.f32 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta))) eta))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (*.f32 (-.f32 (+.f32 (neg.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)) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta))) eta))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta)))) (*.f32 (-.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (/.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))))) (+.f32 (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal 0 binary32)) (pow.f32 eta #s(literal 4 binary32))) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta)))) eta))
#s(approx (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (*.f32 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 #s(literal 1/8 binary32) (pow.f32 sinTheta_O #s(literal 6 binary32))) (pow.f32 eta #s(literal 6 binary32)))) (pow.f32 eta #s(literal 3 binary32))))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (*.f32 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta))) (*.f32 eta eta)))
#s(approx (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta))) (*.f32 (-.f32 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) #s(literal -1/4 binary32)) (pow.f32 eta #s(literal 4 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) eta) -1/2) eta)) (*.f32 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta))) (*.f32 eta eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (neg.f32 h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta))) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.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 (cosh.f32 (atanh.f32 sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 sinTheta_O sinTheta_O) h)) (*.f32 eta eta)))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (+.f32 (*.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))) (-.f32 (*.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 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 h (*.f32 (/.f32 sinTheta_O eta) sinTheta_O)) eta) (cosh.f32 (atanh.f32 sinTheta_O)))))) 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) (+.f32 (*.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 (+.f32 (*.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 (+.f32 (+.f32 (*.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))))) (*.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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (neg.f32 eta) (-.f32 (*.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 (* (/ (- 1 (* (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2) (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) (+ 1 (* (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) 1/2))) eta) (*.f32 (neg.f32 eta) (-.f32 (*.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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (neg.f32 h) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.f32 (*.f32 h (/.f32 (*.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32))) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (*.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 (-.f32 (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (*.f32 #s(literal 1/2 binary32) (*.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)))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32)) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal -1/2 binary32)))) eta)))
#s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (neg.f32 (/.f32 (-.f32 (neg.f32 h) (*.f32 (*.f32 (/.f32 h (*.f32 eta eta)) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32))) eta)))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* 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 (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* 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)))) (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta))))))
#s(approx (/ (+ (pow (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) 3) (pow eta 3)) (+ (* (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (* (/ (* sinTheta_O sinTheta_O) eta) -1/2)) (- (* eta eta) (* (* (/ (* 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 (-.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 eta eta))) (/.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) eta) -1/2) 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)))))

eval80.0ms (1.3%)

Memory
-6.7MiB live, 134.6MiB allocated; 14ms collecting garbage
Compiler

Compiled 44 447 to 4 654 computations (89.5% saved)

prune31.0ms (0.5%)

Memory
11.0MiB live, 56.7MiB allocated; 4ms collecting garbage
Pruning

21 alts after pruning (12 fresh and 9 done)

PrunedKeptTotal
New70610716
Fresh426
Picked415
Done088
Total71421735
Accuracy
99.7%
Counts
735 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
22.7%
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))) #s(literal 3 binary32))) (+.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (+.f32 (*.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))) (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))))))
22.9%
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
92.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))))))))
92.0%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))))))
92.0%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))))
91.7%
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
88.5%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
92.0%
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (+.f32 (neg.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) (*.f32 eta eta))))))
77.0%
(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) eta) -1/2) 3) (pow eta 3)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
97.3%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
98.2%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
98.2%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
92.3%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
91.9%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(literal 1 binary32))))) eta))))
98.1%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) #s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta))))) eta))))
95.0%
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
97.9%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))) h) eta)))
39.5%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 #s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (*.f32 (+.f32 (/.f32 h (*.f32 sinTheta_O sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O))) eta)))
87.3%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))))) h)))
60.0%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (/.f32 (+.f32 (*.f32 (*.f32 h (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) h)) (pow.f32 eta #s(literal 3 binary32))))))
91.1%
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (*.f32 h (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) eta)))))
Compiler

Compiled 2 381 to 805 computations (66.2% saved)

regimes83.0ms (1.4%)

Memory
5.0MiB live, 101.1MiB allocated; 11ms 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)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.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)))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(literal 1 binary32))))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (+.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) #s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.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))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))))))
(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 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))) h) eta)))
(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) eta) -1/2) 3) (pow eta 3)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (*.f32 h (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) eta)))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 #s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (*.f32 (+.f32 (/.f32 h (*.f32 sinTheta_O sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O))) eta)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta)))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (+.f32 (neg.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #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) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (/.f32 (+.f32 (*.f32 (*.f32 h (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) h)) (pow.f32 eta #s(literal 3 binary32))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))) #s(literal 3 binary32))) (+.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32)) (+.f32 (*.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))) (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)) (*.f32 eta eta)) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))) (+.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32))))))
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) #s(literal 3 binary32))) (+.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O)))))))))))
(/.f32 (*.f32 (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (+.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (/.f32 (PI.f32) #s(literal 2 binary32)))) (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 2 binary32))) (asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))) (+.f32 (*.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (*.f32 (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 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) (sin.f32 (acos.f32 sinTheta_O)))))))))))
Outputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
Calls

10 calls:

13.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))))))
9.0ms
eta
8.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))))))))
8.0ms
(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
8.0ms
h
Results
AccuracySegmentsBranch
98.2%1(*.f32 sinTheta_O sinTheta_O)
98.2%1(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
98.2%1(*.f32 eta eta)
98.2%1(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
98.2%1(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
98.2%1(/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
98.2%1(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
98.2%1sinTheta_O
98.2%1h
98.2%1eta
Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes66.0ms (1.1%)

Memory
-1.5MiB live, 89.8MiB allocated; 7ms collecting garbage
Counts
25 → 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)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.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)))))) (+.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) #s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(literal 1 binary32))))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (*.f32 (+.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) #s(approx (/ (* (/ (* (/ sinTheta_O eta) sinTheta_O) eta) 1) (sin (acos sinTheta_O))) (*.f32 (/.f32 sinTheta_O eta) (/.f32 sinTheta_O eta))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) (*.f32 sinTheta_O sinTheta_O))) (*.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))) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)))))))))
(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 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))) h) eta)))
(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) eta) -1/2) 3) (pow eta 3)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (*.f32 h (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) eta)))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 eta eta) (*.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 #s(approx (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) (*.f32 (+.f32 (/.f32 h (*.f32 sinTheta_O sinTheta_O)) (/.f32 (*.f32 #s(literal 1/2 binary32) h) (*.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O))) eta)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (/.f32 (+.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 h (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) h) eta)))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (+.f32 (neg.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) #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) eta) #s(literal -1/2 binary32)) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32))) (-.f32 (*.f32 eta eta) (*.f32 (*.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta)))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(approx (/ (+ (* (* 1/2 (* h (/ (* (/ sinTheta_O eta) sinTheta_O) eta))) (/ 1 (sin (acos sinTheta_O)))) h) eta) (/.f32 (+.f32 (*.f32 (*.f32 h (*.f32 sinTheta_O (sinh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (*.f32 eta eta) h)) (pow.f32 eta #s(literal 3 binary32))))))
Outputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
Calls

10 calls:

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

Compiled 83 to 71 computations (14.5% saved)

regimes19.0ms (0.3%)

Memory
-9.8MiB live, 36.8MiB allocated; 3ms collecting garbage
Counts
4 → 2
Calls
Call 1
Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
Outputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
Calls

10 calls:

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

Compiled 83 to 71 computations (14.5% saved)

regimes51.0ms (0.8%)

Memory
-33.5MiB live, 21.7MiB allocated; 86ms collecting garbage
Accuracy

Total -24.0b remaining (-1499.9%)

Threshold costs -24b (-1499.9%)

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

7 calls:

43.0ms
(*.f32 eta eta)
2.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))))))
1.0ms
(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
1.0ms
eta
1.0ms
sinTheta_O
Results
AccuracySegmentsBranch
95.0%1(*.f32 eta eta)
95.0%1(-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
95.0%1(sqrt.f32 (-.f32 (*.f32 eta eta) (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
95.0%1eta
95.0%1(*.f32 sinTheta_O sinTheta_O)
95.0%1(/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
95.0%1sinTheta_O
Compiler

Compiled 47 to 43 computations (8.5% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.0
1.401298464324817e-45
Compiler

Compiled 21 to 19 computations (9.5% saved)

simplify60.0ms (1%)

Memory
7.7MiB live, 57.7MiB allocated; 8ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
053172
179172
2146172
3250172
4372172
5614172
63093172
77251172
Stop Event
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)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
(if (<=.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 0 binary32)) (asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h #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)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) #s(literal 1 binary32)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32)) (*.f32 (/.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 (/.f32 (*.f32 (/.f32 sinTheta_O eta) sinTheta_O) eta) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1/2 binary32)))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (*.f32 (*.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
(if (<=.f32 (/.f32 (*.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 0 binary32)) (asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (asin.f32 (/.f32 h (sqrt.f32 (-.f32 (*.f32 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))

derivations61.0ms (1%)

Memory
20.3MiB live, 65.9MiB allocated; 4ms collecting garbage
Stop Event
fuel
Compiler

Compiled 172 to 53 computations (69.2% saved)

preprocess28.0ms (0.5%)

Memory
1.0MiB live, 46.5MiB allocated; 4ms collecting garbage
Remove

(abs eta)

(abs sinTheta_O)

Compiler

Compiled 932 to 396 computations (57.5% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...