Metrics for HairBSDF, gamma for a refracted ray

start0.0ms (0%)

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

analyze247.0ms (5.1%)

Memory

5.8MiB live, 433.6MiB allocated; 59ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	6.3%	93.7%	0%	0%	0%	0
0%	0%	6.3%	93.7%	0%	0%	0%	1
0%	0%	6.3%	93.7%	0%	0%	0%	2
0%	0%	6.3%	93.7%	0%	0%	0%	3
0%	0%	6.3%	93.7%	0%	0%	0%	4
0%	0%	6.3%	93.7%	0%	0%	0%	5
12.5%	0.8%	5.5%	93.7%	0%	0%	0%	6
12.5%	0.8%	5.5%	93.7%	0%	0%	0%	7
16.7%	1%	4.9%	93.7%	0%	0.4%	0%	8
23.7%	1.4%	4.4%	93.7%	0%	0.5%	0%	9
26.2%	1.4%	3.9%	93.7%	0%	1%	0%	10
33.9%	1.5%	3%	93.7%	0%	1.8%	0%	11
38.9%	1.7%	2.7%	93.7%	0%	1.9%	0%	12

Compiler

Compiled 42 to 28 computations (33.3% saved)

sample2.5s (51%)

Memory

-54.8MiB live, 2 944.1MiB allocated; 1.4s collecting garbage

Samples

810.0ms	8 256×	0	valid
705.0ms	8 038×	0	invalid

Precisions

Click to see histograms. Total time spent on operations: 1.0s

ival-sqrt: 258.0ms (24.9% of total)

ival-mult: 244.0ms (23.6% of total)

ival-div: 201.0ms (19.4% of total)

ival-sub: 185.0ms (17.9% of total)

ival-asin: 125.0ms (12.1% of total)

exact: 14.0ms (1.4% of total)

adjust: 5.0ms (0.5% of total)

ival-assert: 3.0ms (0.3% of total)

Bogosity

explain265.0ms (5.4%)

Memory

-37.3MiB live, 206.4MiB allocated; 81ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
26	-	10	(5.8594394826907275e-30 3.930826483168248e-27 3.960291972485277e-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))))))`
0	-	0	-	`eta`
0	-	0	-	`#s(literal 1 binary32)`
0	-	0	-	`(-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))`
0	-	0	-	`(/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))`
0	-	0	-	`(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))`
0	-	0	-	`(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))`
0	-	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)))))))`
0	-	0	-	`(*.f32 eta eta)`
0	-	0	-	`(*.f32 sinTheta_O sinTheta_O)`
0	-	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))))))))`
0	-	0	-	`sinTheta_O`
0	-	0	-	`h`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`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-rescue	16	0
↳	`(*.f32 sinTheta_O sinTheta_O)`	underflow	298
↳	`(-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))`	underflow	16
↳	`(/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))`	underflow	149
↳	`(*.f32 eta eta)`	underflow	16

Confusion

	Predicted +	Predicted -
+	16	10
-	0	230

Precision

1.0

Recall

0.6153846153846154

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	16	0	10
-	0	0	230

Precision?

1.0

Recall?

0.6153846153846154

Freqs

test

number	freq
0	240
1	16

Total Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	0	0	0

Precision?

1.0

Recall?

1.0

Samples

116.0ms

512×

valid

Compiler

Compiled 212 to 43 computations (79.7% saved)

Precisions

Click to see histograms. Total time spent on operations: 96.0ms

ival-sub: 71.0ms (74.2% of total)

ival-div: 6.0ms (6.3% of total)

ival-mult: 6.0ms (6.3% of total)

ival-sqrt: 6.0ms (6.3% of total)

ival-asin: 4.0ms (4.2% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

preprocess207.0ms (4.2%)

Memory

27.7MiB live, 214.2MiB allocated; 22ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	53	185
1	96	185
2	205	185
3	351	185
4	599	185
5	1186	185
6	6557	185
0	13	18
0	22	18
1	36	18
2	80	18
3	162	18
4	271	18
5	516	18
6	2986	18
7	6867	18
0	8710	18

Stop Event

1×	iter limit
1×	node limit
1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))

Outputs
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))

Symmetry

(abs sinTheta_O)

(abs eta)

Compiler

Compiled 18 to 13 computations (27.8% saved)

eval0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated; 0ms collecting garbage

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	92.2%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))

Compiler

Compiled 18 to 13 computations (27.8% saved)

series32.0ms (0.7%)

Memory

-6.1MiB live, 40.9MiB allocated; 3ms 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:

Time	Variable		Point	Expression
6.0ms	sinTheta_O	@	inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)
4.0ms	eta	@	0	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)
4.0ms	sinTheta_O	@	-inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)
3.0ms	sinTheta_O	@	0	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)
3.0ms	eta	@	inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) eta (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) sinTheta_O (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)) 1)

rewrite129.0ms (2.6%)

Memory

6.5MiB live, 103.4MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	627	4534
0	644	3726
0	3575	3726

Stop Event

1×	iter limit
1×	iter limit
1×	node limit
1×	iter limit

Counts

109 → 134

Calls

Call 1

Inputs
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
h
(sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
(-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
(*.f32 eta eta)
eta
(/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
#s(literal 1 binary32)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx sinTheta_O #s(hole binary32 sinTheta_O))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/8 (pow sinTheta_O 2)) 1/2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (pow sinTheta_O 2)) 1/8)) 1/2)))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 1))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ 1 (* -1 (pow sinTheta_O 2)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (pow sinTheta_O 2))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ 1 (pow sinTheta_O 2)) 1))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx eta #s(hole binary32 eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))

Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))))
(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))
h
(sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))))
(pow.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1/2 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))) (+.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))))))))

eval19.0ms (0.4%)

Memory: -18.6MiB live, 27.4MiB allocated; 3ms collecting garbage
Compiler: Compiled 5 481 to 1 097 computations (80% saved)

prune8.0ms (0.2%)

Memory

16.4MiB live, 16.4MiB allocated; 0ms collecting garbage

Pruning

9 alts after pruning (9 fresh and 0 done)

	Pruned	Kept	Total
New	140	9	149
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	141	9	150

Accuracy

99.2%

Counts

150 → 9

Alt Table

Click to see full alt table

Status	Accuracy	Program
	22.6%	(-.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.2%	(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)))))))
	92.1%	(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))))))
▶	87.5%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
▶	97.7%	(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))))
▶	95.6%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
	78.2%	(asin.f32 #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))))
	46.3%	(asin.f32 #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))))
▶	88.5%	(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 528 to 366 computations (30.7% saved)

series118.0ms (2.4%)

Memory

-4.3MiB live, 135.5MiB allocated; 19ms collecting garbage

Counts

45 → 253

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

Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) eta) -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 (* (- 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))
#s(approx (/ 1 (sin (acos sinTheta_O))) #s(hole binary32 (/ 1 (sin (acos sinTheta_O)))))
#s(approx (sin (acos sinTheta_O)) #s(hole binary32 (sin (acos sinTheta_O))))
#s(approx (acos sinTheta_O) #s(hole binary32 (acos sinTheta_O)))
#s(approx (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/8 (pow sinTheta_O 2)) 1/2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (pow sinTheta_O 2)) 1/8)) 1/2)))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 1))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ 1 (* -1 (pow sinTheta_O 2)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (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 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (exp (* (log eta) 2)) #s(hole binary32 (pow eta 2)))
#s(approx (* (log eta) 2) #s(hole binary32 (* 2 (log eta))))
#s(approx (log eta) #s(hole binary32 (log eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (* (log eta) 2) #s(hole binary32 (* -2 (log (/ 1 eta)))))
#s(approx (log eta) #s(hole binary32 (* -1 (log (/ 1 eta)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (* (log eta) 2) #s(hole binary32 (* 2 (+ (log -1) (* -1 (log (/ -1 eta)))))))
#s(approx (log eta) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 eta))))))

Calls

9 calls:

Time	Variable		Point	Expression
40.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)))) (* (- 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)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)))
22.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)))) (* (- 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)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)))
11.0ms	eta	@	inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (* (/ (* sinTheta_O sinTheta_O) eta) -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)))) (* (- 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)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)))
11.0ms	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)))) (* (- 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)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)))
8.0ms	sinTheta_O	@	0	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (* (/ (* sinTheta_O sinTheta_O) eta) -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)))) (* (- 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)) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* sinTheta_O sinTheta_O)))

rewrite217.0ms (4.4%)

Memory

-8.6MiB live, 178.5MiB allocated; 35ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1165	13365
0	1226	11414
0	6341	11414

Stop Event

1×	iter limit
1×	iter limit
1×	node limit
1×	iter limit

Counts

298 → 389

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 (-.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))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(/.f32 h (sqrt.f32 (-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
(sqrt.f32 (-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))
(-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(log.f32 eta)
#s(literal 2 binary32)
(/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 eta))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* (/ (* sinTheta_O sinTheta_O) eta) -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 (* (- 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))
#s(approx (/ 1 (sin (acos sinTheta_O))) #s(hole binary32 (/ 1 (sin (acos sinTheta_O)))))
#s(approx (sin (acos sinTheta_O)) #s(hole binary32 (sin (acos sinTheta_O))))
#s(approx (acos sinTheta_O) #s(hole binary32 (acos sinTheta_O)))
#s(approx (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 1))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* -1/2 (pow sinTheta_O 2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* -1/8 (pow sinTheta_O 2)) 1/2)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ 1 (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -1/16 (pow sinTheta_O 2)) 1/8)) 1/2)))))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 1))
#s(approx (- 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ 1 (* -1 (pow sinTheta_O 2)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (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 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))) (/ 1/8 (* (pow sinTheta_O 4) (pow (sqrt -1) 3))))))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (* 1/16 (/ 1 (* (pow sinTheta_O 6) (pow (sqrt -1) 5)))))) (* 1/8 (/ 1 (* (pow sinTheta_O 4) (pow (sqrt -1) 3)))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx h #s(hole binary32 h))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (/ (+ (* -1/2 (pow sinTheta_O 2)) (pow eta 2)) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (exp (* (log eta) 2)) #s(hole binary32 (pow eta 2)))
#s(approx (* (log eta) 2) #s(hole binary32 (* 2 (log eta))))
#s(approx (log eta) #s(hole binary32 (log eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (* (log eta) 2) #s(hole binary32 (* -2 (log (/ 1 eta)))))
#s(approx (log eta) #s(hole binary32 (* -1 (log (/ 1 eta)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (* (log eta) 2) #s(hole binary32 (* 2 (+ (log -1) (* -1 (log (/ -1 eta)))))))
#s(approx (log eta) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 eta))))))

Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))))
(/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)))
h
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))
(/.f32 (-.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)) (.f32 eta eta)) (-.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))
(/.f32 (-.f32 (.f32 eta eta) (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta))) (-.f32 eta (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)))
(/.f32 (+.f32 (pow.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)) (-.f32 (.f32 eta eta) (.f32 (/.f32 (.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))))
(/.f32 (+.f32 (pow.f32 eta #s(literal 3 binary32)) (pow.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) #s(literal 3 binary32))) (+.f32 (.f32 eta eta) (-.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)) (.f32 eta (/.f32 (.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)))))
(-.f32 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.f32 sinTheta_O eta))))
(+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)
(+.f32 eta (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta))
(.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O (/.f32 sinTheta_O eta)))
(.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32))
(/.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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* 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)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* 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 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (.f32 (-.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) (sqrt (- 1 (* 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)))))
(sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* 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))))
(pow.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* 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(literal 1/2 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (.f32 #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (.f32 (-.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) (sqrt (- 1 (* 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 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* 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 (pow.f32 (.f32 eta eta) #s(literal 3 binary32)) (pow.f32 #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (.f32 (-.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) (sqrt (- 1 (* 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 (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* 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 eta eta) #s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* 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 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* 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 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)))
(*.f32 eta eta)
(pow.f32 (exp.f32 (log.f32 eta)) #s(literal 2 binary32))
(pow.f32 eta #s(literal 2 binary32))
(+.f32 (cosh.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (sinh.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* 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 (-.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 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 sinTheta_O sinTheta_O)))
(+.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (.f32 (.f32 sinTheta_O sinTheta_O) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O))))
(/.f32 (-.f32 #s(literal 1 binary32) (.f32 (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.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))))
(/.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 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O))))
(/.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 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (.f32 (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.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))))))
(-.f32 #s(literal 1 binary32) (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)))
(+.f32 (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32))
(+.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))
#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 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))))
(asin.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)
(.f32 h (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))))
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1/2 binary32))
(/.f32 #s(literal -1 binary32) (neg.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))))
(/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))
(pow.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (.f32 (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))) (+.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))
(/.f32 (-.f32 (pow.f32 (.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (+.f32 (.f32 (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))))
(-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))
(+.f32 (.f32 eta eta) (.f32 (neg.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (.f32 eta eta) (.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
(.f32 (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) sinTheta_O) sinTheta_O)
(.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))
(.f32 (.f32 sinTheta_O sinTheta_O) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 #s(literal -1 binary32) (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal -1 binary32))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (acos.f32 sinTheta_O))
(cos.f32 (asin.f32 sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (asin.f32 sinTheta_O))
(acos.f32 sinTheta_O)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))))
(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))))))
(sqrt.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))
(pow.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1/2 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))))) (+.f32 (.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))
(/.f32 (-.f32 (pow.f32 (.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))))
(-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)))
(*.f32 eta eta)
(pow.f32 (exp.f32 (log.f32 eta)) #s(literal 2 binary32))
(pow.f32 eta #s(literal 2 binary32))
(+.f32 (cosh.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (sinh.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(log.f32 (*.f32 eta eta))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(*.f32 #s(literal 2 binary32) (log.f32 eta))
(+.f32 (log.f32 eta) (log.f32 eta))
(log.f32 eta)
#s(literal 2 binary32)
(*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (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 #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(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (asin.f32 (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (+ (* (/ (* 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) #s(literal -1/2 binary32)) eta) eta))
#s(approx (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta))
#s(approx (/ (* sinTheta_O sinTheta_O) eta) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)))
#s(approx (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx sinTheta_O sinTheta_O)
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (-.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) (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 (* (- 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 h eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (/.f32 (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (*.f32 (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 eta #s(literal 3 binary32)))) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (.f32 (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 eta #s(literal 3 binary32)))) (/.f32 (.f32 #s(literal 3/8 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 5 binary32))))) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (.f32 (+.f32 (/.f32 #s(literal 3/8 binary32) (.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 5 binary32)))) (/.f32 (.f32 #s(literal 5/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 7 binary32))))) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) (.f32 (sin.f32 (acos.f32 sinTheta_O)) (pow.f32 eta #s(literal 3 binary32))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 (pow.f32 eta #s(literal 4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (+.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 6 binary32)))) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (+.f32 (.f32 (+.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 (pow.f32 eta #s(literal 8 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (/.f32 (pow.f32 eta #s(literal -6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))) (.f32 sinTheta_O sinTheta_O)) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (+.f32 (/.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))) (.f32 eta eta)))
#s(approx (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (/ 1 (sin (acos sinTheta_O))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (sin (acos sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
#s(approx (acos sinTheta_O) (acos.f32 sinTheta_O))
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (asin.f32 (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (+.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (sin (acos sinTheta_O)) #s(literal 1 binary32))
#s(approx (sin (acos sinTheta_O)) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O))))
#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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (-.f32 (/.f32 eta (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (.f32 (-.f32 (/.f32 (.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (.f32 (-.f32 (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (* (- 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 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))
#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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) (.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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) (.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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) (.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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 (/.f32 (.f32 eta eta) (.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (.f32 (.f32 (/.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))))) #s(literal -1/2 binary32)) (+.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 (/.f32 (.f32 eta eta) (.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 (.f32 (.f32 (/.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))))) #s(literal -1/2 binary32)) (.f32 (.f32 #s(literal -1/2 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))) (.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) (+.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 (/.f32 (.f32 eta eta) (.f32 (sqrt.f32 #s(literal -1 binary32)) (.f32 sinTheta_O sinTheta_O))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32)))) sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (neg.f32 (/.f32 (pow.f32 (.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (.f32 sinTheta_O sinTheta_O))) (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (.f32 #s(literal -1 binary32) (+.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) (pow.f32 sinTheta_O #s(literal 4 binary32))))) (/.f32 (pow.f32 (.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (.f32 sinTheta_O sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (-.f32 (.f32 #s(literal -1 binary32) (+.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (/.f32 (pow.f32 (.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (.f32 sinTheta_O sinTheta_O))) (/.f32 (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (.f32 (-.f32 (/.f32 (.f32 eta eta) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (.f32 (-.f32 (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (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 (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (.f32 (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (.f32 (-.f32 (neg.f32 (/.f32 (.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (.f32 eta eta) (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (.f32 (-.f32 (neg.f32 (/.f32 (+.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 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) (.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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) (.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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) (.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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 (/.f32 (.f32 eta eta) (.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (.f32 (.f32 (/.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))))) #s(literal -1/2 binary32)) (+.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 (/.f32 (.f32 eta eta) (.f32 (sqrt.f32 #s(literal -1 binary32)) (*.f32 sinTheta_O sinTheta_O))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 (.f32 (.f32 (/.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))))) #s(literal -1/2 binary32)) (.f32 (.f32 #s(literal -1/2 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))) (.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) (+.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 (/.f32 (.f32 eta eta) (.f32 (sqrt.f32 #s(literal -1 binary32)) (.f32 sinTheta_O sinTheta_O))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32)))) sinTheta_O)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (.f32 (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (.f32 (-.f32 (neg.f32 (/.f32 (.f32 eta eta) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (.f32 (-.f32 (neg.f32 (/.f32 (-.f32 (.f32 eta eta) (/.f32 #s(literal 1/2 binary32) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (neg.f32 (.f32 (-.f32 (neg.f32 (/.f32 (+.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 (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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))
#s(approx h h)
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (+ (* (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (exp (* (log eta) 2)) (*.f32 eta eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.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 (.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.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 (*.f32 h (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (.f32 (/.f32 (.f32 eta eta) (.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32)) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (+.f32 (.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (.f32 (/.f32 (.f32 (.f32 (.f32 eta eta) 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 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (+.f32 (.f32 (.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))) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 #s(literal 1 binary32) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) (.f32 (/.f32 (.f32 (.f32 (.f32 eta eta) sinTheta_O) (+.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 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) #s(literal -1/2 binary32))) (.f32 eta eta)) (/.f32 (sqrt.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (neg.f32 (/.f32 (pow.f32 (.f32 eta (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (/.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (-.f32 (neg.f32 (.f32 (.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (.f32 eta eta)) (/.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (-.f32 (.f32 (-.f32 (neg.f32 (.f32 (.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (.f32 eta eta)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (.f32 eta eta)) (/.f32 (neg.f32 (sin.f32 (acos.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))
#s(approx (exp (* (log eta) 2)) (*.f32 eta eta))
#s(approx (* (log eta) 2) (*.f32 (log.f32 eta) #s(literal 2 binary32)))
#s(approx (log eta) (log.f32 eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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) #s(literal -1/2 binary32)) (.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (-.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 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta))) eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 (.f32 (.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O)))))) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (/.f32 (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 eta eta))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (-.f32 (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32)) (.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (-.f32 (.f32 (/.f32 (+.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 (.f32 sinTheta_O sinTheta_O) (.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O)))))) eta))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))) #s(literal 1 binary32)) (/.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 eta eta)))) (*.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 1 binary32)) (/.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 eta eta)))) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))))) (*.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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) #s(literal -1/2 binary32)) (.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (-.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 (- (exp (* (log eta) 2)) (/ (* 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 (* (log eta) 2) (*.f32 (neg.f32 (log.f32 eta)) #s(literal -2 binary32)))
#s(approx (log eta) (neg.f32 (neg.f32 (log.f32 eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (-.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (-.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 (- (exp (* (log eta) 2)) (/ (* 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) #s(literal -1/2 binary32)) (.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (+.f32 (-.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 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta)) #s(literal 1 binary32))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 (.f32 (.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (/.f32 (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 eta eta))) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (-.f32 (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32)) (.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (-.f32 (.f32 (/.f32 (+.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 (.f32 sinTheta_O sinTheta_O) (.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (-.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (-.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 (- (exp (* (log eta) 2)) (/ (* 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) #s(literal -1/2 binary32)) (.f32 eta eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (+.f32 (-.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 (* (log eta) 2) (*.f32 (+.f32 (neg.f32 (log.f32 (/.f32 #s(literal -1 binary32) eta))) (log.f32 #s(literal -1 binary32))) #s(literal 2 binary32)))
#s(approx (log eta) (+.f32 (neg.f32 (log.f32 (/.f32 #s(literal -1 binary32) eta))) (log.f32 #s(literal -1 binary32))))

eval48.0ms (1%)

Memory: 14.6MiB live, 59.9MiB allocated; 4ms collecting garbage
Compiler: Compiled 17 622 to 2 570 computations (85.4% saved)

prune20.0ms (0.4%)

Memory

-18.5MiB live, 29.1MiB allocated; 2ms collecting garbage

Pruning

15 alts after pruning (13 fresh and 2 done)

	Pruned	Kept	Total
New	391	12	403
Fresh	3	1	4
Picked	3	2	5
Done	0	0	0
Total	397	15	412

Accuracy

99.7%

Counts

412 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
	25.7%	(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
✓	92.2%	(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)))))))
▶	92.1%	(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))))))
▶	87.5%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))))))
	76.7%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)) (-.f32 (.f32 eta eta) (.f32 (/.f32 (.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)))))))
▶	98.1%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (-.f32 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.f32 sinTheta_O eta)))))))
✓	95.6%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
	91.7%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
	88.5%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
	84.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 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
▶	38.8%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.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))))) h)))
	85.3%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
	85.4%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 #s(approx (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)))
	91.1%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (/.f32 (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 eta eta))) #s(literal 1 binary32)) eta)) h)))
▶	95.1%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))

Compiler

Compiled 1 062 to 672 computations (36.7% saved)

series74.0ms (1.5%)

Memory

47.4MiB live, 93.0MiB allocated; 3ms collecting garbage

Counts

46 → 230

Calls

Call 1

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

Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 eta))
#s(approx (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* 1/2 (* sinTheta_O (/ sinTheta_O eta))) #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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (pow eta 2)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow eta 2)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ (pow eta 2) (pow sinTheta_O 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) (pow sinTheta_O 2))))
#s(approx (/ (* eta eta) (* sinTheta_O sinTheta_O)) #s(hole binary32 (/ (pow eta 2) (pow sinTheta_O 2))))
#s(approx (/ 1 (sin (acos sinTheta_O))) #s(hole binary32 (/ 1 (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 (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ -1 (sin (acos sinTheta_O)))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (- (/ (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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (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 (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (/ (- (pow eta 2) (* 1/2 (pow sinTheta_O 2))) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 eta) #s(hole binary32 (/ 1 eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (exp (* (log eta) 2)) #s(hole binary32 (pow eta 2)))
#s(approx (* (log eta) 2) #s(hole binary32 (* 2 (log eta))))
#s(approx (log eta) #s(hole binary32 (log eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (log eta) 2) #s(hole binary32 (* -2 (log (/ 1 eta)))))
#s(approx (log eta) #s(hole binary32 (* -1 (log (/ 1 eta)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (* (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 (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (log eta) 2) #s(hole binary32 (* 2 (+ (log -1) (* -1 (log (/ -1 eta)))))))
#s(approx (log eta) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 eta))))))

Calls

9 calls:

Time	Variable		Point	Expression
16.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 (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta))) 1/2 (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 eta) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sin (acos 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
12.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 (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta))) 1/2 (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 eta) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sin (acos 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
11.0ms	eta	@	-inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta))) 1/2 (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 eta) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sin (acos 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
6.0ms	sinTheta_O	@	inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta))) 1/2 (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 eta) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sin (acos 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))
6.0ms	sinTheta_O	@	-inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta))) 1/2 (* sinTheta_O (/ sinTheta_O eta)) sinTheta_O (/ sinTheta_O eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 eta) 1 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* sinTheta_O sinTheta_O) (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (exp (* (log eta) 2)) (* (log eta) 2) (log eta) 2 (/ (* sinTheta_O sinTheta_O) (sin (acos 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O))) (sin (acos sinTheta_O)) (acos sinTheta_O))

rewrite213.0ms (4.4%)

Memory

5.1MiB live, 240.2MiB allocated; 25ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1197	12550
0	1243	11093
1	6687	10436
0	8115	10436

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

276 → 384

Calls

Call 1

Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (-.f32 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.f32 sinTheta_O eta)))))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (-.f32 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.f32 sinTheta_O eta))))))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (-.f32 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.f32 sinTheta_O eta)))))
(-.f32 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.f32 sinTheta_O eta))))
eta
(.f32 #s(literal 1/2 binary32) (.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)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h))
(.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
(/.f32 #s(literal 1 binary32) eta)
#s(literal 1 binary32)
(asin.f32 (/.f32 h (sqrt.f32 (-.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))
(*.f32 sinTheta_O sinTheta_O)
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))))))
(/.f32 h (sqrt.f32 (-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))))
(sqrt.f32 (-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))))
(-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(log.f32 eta)
#s(literal 2 binary32)
(/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))
#s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.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))))) h))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)))
(.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))
(-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O))
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 eta))
#s(approx (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (* 1/2 (* sinTheta_O (/ sinTheta_O eta))) #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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* 1/2 (pow sinTheta_O 2))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* 3/8 (pow sinTheta_O 2))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* (pow sinTheta_O 2) (+ 1 (* (pow sinTheta_O 2) (+ 1/2 (* (pow sinTheta_O 2) (+ 3/8 (* 5/16 (pow sinTheta_O 2))))))))))
#s(approx (* sinTheta_O sinTheta_O) #s(hole binary32 (pow sinTheta_O 2)))
#s(approx (asin (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (pow eta 2)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow eta 2)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ (pow eta 2) (pow sinTheta_O 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) (pow sinTheta_O 2))))
#s(approx (/ (* eta eta) (* sinTheta_O sinTheta_O)) #s(hole binary32 (/ (pow eta 2) (pow sinTheta_O 2))))
#s(approx (/ 1 (sin (acos sinTheta_O))) #s(hole binary32 (/ 1 (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 (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (* -1/2 (/ (pow sinTheta_O 2) eta))))
#s(approx (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ eta (pow sinTheta_O 2)) (* 1/2 (/ 1 eta))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (/ (pow eta 2) sinTheta_O) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (- (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (+ (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))) (/ (pow eta 2) sinTheta_O))) (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* (* sinTheta_O (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ -1 (sin (acos sinTheta_O)))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (- (/ (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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* sinTheta_O (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 2) (sqrt -1)))) (* 1/2 (/ 1 (sqrt -1)))) sinTheta_O)) (pow eta 2)) sinTheta_O)) (sqrt -1))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (sqrt -1) (* 1/2 (/ 1 (* (pow sinTheta_O 2) (sqrt -1)))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (* sinTheta_O (- (+ (sqrt -1) (+ (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (* (pow sinTheta_O 4) (sqrt -1)))) (* -1/2 (/ (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2)))) (* (pow sinTheta_O 6) (sqrt -1)))))) (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (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 (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (/ (- (pow eta 2) (* 1/2 (pow sinTheta_O 2))) eta)))
#s(approx eta #s(hole binary32 eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 eta) #s(hole binary32 (/ 1 eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (exp (* (log eta) 2)) #s(hole binary32 (pow eta 2)))
#s(approx (* (log eta) 2) #s(hole binary32 (* 2 (log eta))))
#s(approx (log eta) #s(hole binary32 (log eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (* eta (+ 1 (* -1/2 (/ (pow sinTheta_O 2) (pow eta 2)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (log eta) 2) #s(hole binary32 (* -2 (log (/ 1 eta)))))
#s(approx (log eta) #s(hole binary32 (* -1 (log (/ 1 eta)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (* (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 (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) #s(hole binary32 (* -1 (* eta (- (* 1/2 (/ (pow sinTheta_O 2) (pow eta 2))) 1)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (log eta) 2) #s(hole binary32 (* 2 (+ (log -1) (* -1 (log (/ -1 eta)))))))
#s(approx (log eta) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 eta))))))

Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (-.f32 eta (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1/2 binary32)))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (-.f32 eta (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1/2 binary32))))))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (-.f32 eta (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1/2 binary32))))))
(/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (-.f32 eta (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1/2 binary32)))))
h
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (-.f32 eta (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1/2 binary32))))
(/.f32 (-.f32 (.f32 eta eta) (.f32 (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1/2 binary32)) (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1/2 binary32)))) (+.f32 eta (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1/2 binary32))))
(/.f32 (-.f32 (.f32 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 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 (+.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 (.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)) eta)
(+.f32 eta (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))
eta
(.f32 (.f32 #s(literal 1/2 binary32) sinTheta_O) (/.f32 sinTheta_O eta))
(.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)
#s(literal 1/2 binary32)
(*.f32 (/.f32 sinTheta_O eta) sinTheta_O)
(*.f32 sinTheta_O (/.f32 sinTheta_O eta))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 eta))
(/.f32 (*.f32 sinTheta_O sinTheta_O) eta)
sinTheta_O
(/.f32 (neg.f32 sinTheta_O) (neg.f32 eta))
(/.f32 sinTheta_O eta)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h))
(.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)
(.f32 h #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
(/.f32 #s(literal -1 binary32) (neg.f32 eta))
(/.f32 #s(literal 1 binary32) eta)
(pow.f32 eta #s(literal -1 binary32))
(exp.f32 (*.f32 (log.f32 eta) #s(literal -1 binary32)))
#s(literal 1 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (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))
(exp.f32 (.f32 (log.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 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)))
(*.f32 eta eta)
(pow.f32 (exp.f32 (log.f32 eta)) #s(literal 2 binary32))
(pow.f32 eta #s(literal 2 binary32))
(+.f32 (cosh.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (sinh.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 (exp.f32 (log.f32 eta))) #s(literal 2 binary32)))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
(*.f32 (pow.f32 sinTheta_O #s(literal 1 binary32)) (pow.f32 sinTheta_O #s(literal 1 binary32)))
(*.f32 (neg.f32 sinTheta_O) (neg.f32 sinTheta_O))
(*.f32 (fabs.f32 sinTheta_O) (fabs.f32 sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(+.f32 (cosh.f32 (.f32 (log.f32 sinTheta_O) #s(literal 2 binary32))) (sinh.f32 (.f32 (log.f32 sinTheta_O) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))))))
(/.f32 (neg.f32 h) (neg.f32 (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))))))
(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))))))
(sqrt.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))))
(pow.f32 (-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))) #s(literal 1/2 binary32))
(exp.f32 (.f32 (log.f32 (-.f32 (.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))))) #s(literal 1/2 binary32)))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))) (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))))) (+.f32 (.f32 eta eta) (*.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))))
(/.f32 (-.f32 (pow.f32 (.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))) (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))) (.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))))))
(-.f32 (.f32 eta eta) (.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)))
(*.f32 eta eta)
(pow.f32 (exp.f32 (log.f32 eta)) #s(literal 2 binary32))
(pow.f32 eta #s(literal 2 binary32))
(+.f32 (cosh.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (sinh.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 (exp.f32 (log.f32 eta))) #s(literal 2 binary32)))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
(log.f32 (*.f32 eta eta))
(*.f32 (log.f32 eta) #s(literal 2 binary32))
(*.f32 #s(literal 2 binary32) (log.f32 (exp.f32 (log.f32 eta))))
(*.f32 #s(literal 2 binary32) (log.f32 eta))
(+.f32 (log.f32 (pow.f32 eta #s(literal 1 binary32))) (log.f32 (pow.f32 eta #s(literal 1 binary32))))
(+.f32 (log.f32 (neg.f32 eta)) (log.f32 (neg.f32 eta)))
(+.f32 (log.f32 (fabs.f32 eta)) (log.f32 (fabs.f32 eta)))
(+.f32 (log.f32 (exp.f32 (log.f32 eta))) (log.f32 (exp.f32 (log.f32 eta))))
(+.f32 (log.f32 eta) (log.f32 eta))
(log.f32 eta)
#s(literal 2 binary32)
(*.f32 sinTheta_O (/.f32 sinTheta_O #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (neg.f32 #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))
#s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)
(.f32 h (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (sqrt.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(pow.f32 (sqrt.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))) #s(literal -1 binary32))
(pow.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32))
(exp.f32 (.f32 (log.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) #s(literal 1/2 binary32)))
(/.f32 #s(literal -1 binary32) (neg.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))
(pow.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))) #s(literal -1 binary32))
(exp.f32 (.f32 (log.f32 #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))) #s(literal -1 binary32)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(.f32 (.f32 (-.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) sinTheta_O) sinTheta_O)
(.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))
(.f32 (.f32 sinTheta_O sinTheta_O) (-.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(/.f32 (-.f32 (.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O)))) (+.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
(/.f32 (-.f32 (pow.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) #s(literal 3 binary32)) (pow.f32 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 3 binary32))) (+.f32 (.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (+.f32 (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))))
(/.f32 (-.f32 (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))) (.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
(-.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O)))
(*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))
(.f32 eta (/.f32 eta (.f32 sinTheta_O sinTheta_O)))
(/.f32 (neg.f32 (.f32 eta eta)) (neg.f32 (.f32 sinTheta_O sinTheta_O)))
(/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) sinTheta_O)
(/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 #s(literal -1 binary32) (sin.f32 (neg.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))
(exp.f32 (.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32)))
(exp.f32 (*.f32 (log.f32 (sin.f32 (acos.f32 sinTheta_O))) #s(literal -1 binary32)))
(cosh.f32 (atanh.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(cosh.f32 (atanh.f32 (neg.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 (fabs.f32 sinTheta_O)))
(cosh.f32 (atanh.f32 sinTheta_O))
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 (.f32 (sin.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (sin.f32 (acos.f32 sinTheta_O))) (.f32 (cos.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (sin.f32 (asin.f32 sinTheta_O))))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))))
(sin.f32 (acos.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(sin.f32 (acos.f32 (neg.f32 sinTheta_O)))
(sin.f32 (acos.f32 (fabs.f32 sinTheta_O)))
(sin.f32 (acos.f32 sinTheta_O))
(exp.f32 (.f32 (log.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal 1/2 binary32)))
(cos.f32 (neg.f32 (asin.f32 sinTheta_O)))
(cos.f32 (asin.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(cos.f32 (asin.f32 (neg.f32 sinTheta_O)))
(cos.f32 (asin.f32 (fabs.f32 sinTheta_O)))
(cos.f32 (asin.f32 sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (asin.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (asin.f32 (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (-.f32 eta (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1/2 binary32))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) eta)
#s(approx (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) (-.f32 eta (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal 1/2 binary32))))
#s(approx (* 1/2 (* sinTheta_O (/ sinTheta_O eta))) (.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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 h eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.f32 (.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 5 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 3/8 binary32))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (.f32 (+.f32 (/.f32 #s(literal 3/8 binary32) (.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 eta #s(literal 5 binary32)))) (.f32 (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32))) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) (.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 eta eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (+.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos 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 (- (exp (* (log eta) 2)) (/ (* 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 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O))) (.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 (* sinTheta_O sinTheta_O) (*.f32 sinTheta_O sinTheta_O))
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (asin.f32 (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.f32 (.f32 (.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O 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) (sqrt (- 1 (* sinTheta_O 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) eta)
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 eta eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (+.f32 (neg.f32 (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) (.f32 eta eta)))
#s(approx (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))
#s(approx (sin (acos sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 (pow.f32 eta #s(literal 4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (+.f32 (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (+.f32 (.f32 (+.f32 (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 8 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) (/.f32 (pow.f32 eta #s(literal -6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)))) (.f32 sinTheta_O sinTheta_O)) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (+.f32 (neg.f32 (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) (.f32 eta eta)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (*.f32 eta eta))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (+.f32 (neg.f32 (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) (.f32 eta eta)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 (+.f32 (neg.f32 (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) (.f32 eta eta)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* eta eta) (* sinTheta_O sinTheta_O)) (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)))
#s(approx (/ 1 (sin (acos sinTheta_O))) (cosh.f32 (atanh.f32 sinTheta_O)))
#s(approx (acos sinTheta_O) (acos.f32 sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) (.f32 (.f32 (/.f32 sinTheta_O eta) sinTheta_O) #s(literal -1/2 binary32)))
#s(approx (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) (.f32 (-.f32 (/.f32 eta (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) eta)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 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)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 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)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 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))) (.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (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) (sqrt (- 1 (* sinTheta_O 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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (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) (sqrt (- 1 (* sinTheta_O 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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (.f32 sinTheta_O (sqrt.f32 (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (.f32 (+.f32 (sqrt.f32 (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32))) (.f32 (.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32))) (.f32 (.f32 #s(literal 1/2 binary32) (/.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32))) (.f32 (.f32 #s(literal 1/2 binary32) (/.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (.f32 #s(literal -1 binary32) (+.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (pow.f32 (.f32 (sin.f32 (acos.f32 sinTheta_O)) eta) #s(literal 2 binary32)) (.f32 sinTheta_O sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))) (-.f32 (neg.f32 (.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))) (/.f32 (pow.f32 (.f32 (sin.f32 (acos.f32 sinTheta_O)) eta) #s(literal 2 binary32)) (.f32 sinTheta_O sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (.f32 #s(literal -1 binary32) (+.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 (pow.f32 eta #s(literal 6 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))))) (+.f32 (.f32 (pow.f32 eta #s(literal 4 binary32)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (/.f32 (pow.f32 (.f32 (sin.f32 (acos.f32 sinTheta_O)) eta) #s(literal 2 binary32)) (.f32 sinTheta_O sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (.f32 (-.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 #s(literal -1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (-.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (cosh.f32 (atanh.f32 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 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)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 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)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 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))) (.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (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) (sqrt (- 1 (* sinTheta_O 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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (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) (sqrt (- 1 (* sinTheta_O 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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (.f32 sinTheta_O (sqrt.f32 (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 (.f32 (+.f32 (sqrt.f32 (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32))) (.f32 (.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32))) (.f32 (.f32 #s(literal 1/2 binary32) (/.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32))) (.f32 (.f32 #s(literal 1/2 binary32) (/.f32 (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) (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 (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (.f32 sinTheta_O sinTheta_O))))) h))
#s(approx h h)
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))) h))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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) (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)) #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) (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)) #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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) (/.f32 (-.f32 (.f32 eta eta) (.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32))) eta))
#s(approx eta eta)
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (.f32 eta eta) (.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (+.f32 (.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (.f32 (/.f32 (.f32 (.f32 (.f32 eta eta) 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 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (+.f32 (.f32 (.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))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (/.f32 (.f32 (.f32 (.f32 eta eta) 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 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (.f32 eta eta)) (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (/ 1 eta) (/.f32 #s(literal 1 binary32) eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (-.f32 (.f32 eta eta) (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (exp (* (log eta) 2)) (*.f32 eta eta))
#s(approx (/ 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 eta) h) (.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (/.f32 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#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 (/.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 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#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 (/.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 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal -1 binary32))))))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (-.f32 (.f32 eta eta) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))
#s(approx (exp (* (log eta) 2)) (*.f32 eta eta))
#s(approx (* (log eta) 2) (*.f32 (log.f32 eta) #s(literal 2 binary32)))
#s(approx (log eta) (log.f32 eta))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (.f32 #s(literal -1 binary32) (+.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 sinTheta_O sinTheta_O)) (/.f32 (pow.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) eta) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (-.f32 (neg.f32 (.f32 (.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (.f32 eta eta)) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (-.f32 (.f32 (-.f32 (neg.f32 (.f32 (.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (.f32 eta eta)) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (.f32 eta eta)) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (.f32 eta eta) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))))
#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)) (cosh.f32 (atanh.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)) (cosh.f32 (atanh.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)) (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 (.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.f32 sinTheta_O))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.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 (* 1/2 (* sinTheta_O (/ sinTheta_O 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (+.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 (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32))) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))))) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (-.f32 #s(literal 1 binary32) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (-.f32 (.f32 (/.f32 (-.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 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) eta))
#s(approx (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O)))) (.f32 (+.f32 (neg.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1 binary32)) (*.f32 eta eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta))
#s(approx (/ 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)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32))) (.f32 (.f32 (/.f32 h (.f32 eta eta)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32))) 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)) (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 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (.f32 (+.f32 (+.f32 (-.f32 (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.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 (- (exp (* (log eta) 2)) (/ (* 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 (* (log eta) 2) (*.f32 (neg.f32 (log.f32 eta)) #s(literal -2 binary32)))
#s(approx (log eta) (neg.f32 (neg.f32 (log.f32 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) (.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal 1 binary32)) (/.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 1 binary32)) (/.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (neg.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 eta #s(literal 4 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))))) (.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O 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 (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O 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 (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (/.f32 (pow.f32 eta #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 eta eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (-.f32 h (.f32 #s(literal -1/2 binary32) (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.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)) (cosh.f32 (atanh.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)) (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 (.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))))) eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.f32 sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O)))) #s(literal 1 binary32))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.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 (- eta (* 1/2 (* sinTheta_O (/ sinTheta_O eta)))) (.f32 (neg.f32 eta) (-.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (.f32 eta eta)) #s(literal 1 binary32))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (+.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 (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (-.f32 #s(literal 1 binary32) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (-.f32 (.f32 (/.f32 (-.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 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (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 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta)))
#s(approx (/ 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)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32))) (.f32 (.f32 (/.f32 h (.f32 eta eta)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32))) 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)) (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 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))))) eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (neg.f32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sin (acos sinTheta_O))))) (.f32 (neg.f32 eta) (+.f32 (+.f32 (-.f32 (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.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 (* (log eta) 2) (+.f32 #s(literal 0 binary32) (*.f32 #s(literal 2 binary32) (neg.f32 (log.f32 (/.f32 #s(literal -1 binary32) eta))))))
#s(approx (log eta) (log.f32 (*.f32 (pow.f32 (/.f32 #s(literal -1 binary32) eta) #s(literal -1 binary32)) #s(literal -1 binary32))))

eval53.0ms (1.1%)

Memory: 7.6MiB live, 94.3MiB allocated; 11ms collecting garbage
Compiler: Compiled 22 075 to 2 870 computations (87% saved)

prune19.0ms (0.4%)

Memory

0.0MiB live, 45.9MiB allocated; 5ms collecting garbage

Pruning

15 alts after pruning (10 fresh and 5 done)

	Pruned	Kept	Total
New	438	6	444
Fresh	4	4	8
Picked	2	3	5
Done	0	2	2
Total	444	15	459

Accuracy

99.7%

Counts

459 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	25.7%	(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
✓	92.2%	(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)))))))
✓	92.1%	(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))))))
	76.7%	(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)) (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)))))))))
✓	98.1%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (-.f32 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.f32 sinTheta_O eta)))))))
✓	95.6%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
▶	91.7%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta)))
▶	91.7%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
	88.5%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
▶	38.8%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.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))))) (*.f32 sinTheta_O sinTheta_O))))) h)))
▶	33.9%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
	33.8%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (/.f32 (pow.f32 eta #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 eta eta))) (*.f32 sinTheta_O sinTheta_O))))) h)))
	85.3%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
✓	95.1%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
	90.5%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal -1 binary32)))) h)))

Compiler

Compiled 1 095 to 645 computations (41.1% saved)

series109.0ms (2.2%)

Memory

-5.6MiB live, 185.3MiB allocated; 21ms collecting garbage

Counts

56 → 316

Calls

Call 1

Inputs
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))
(.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))))
#s(literal 1 binary32)
(sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))
(-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 eta eta)
eta
(/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
(.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
h
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(/.f32 (PI.f32) #s(literal 2 binary32))
(PI.f32)
#s(literal 2 binary32)
(acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))
(.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)))
(*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))
(/.f32 eta sinTheta_O)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.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))))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O))))) h))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.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))))) (*.f32 sinTheta_O sinTheta_O)))
(.f32 (-.f32 (/.f32 (.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))))) (*.f32 sinTheta_O sinTheta_O))
(-.f32 (/.f32 (.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)))))
(/.f32 (.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) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta))
(/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta)
(+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h)
(.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32))
(.f32 (/.f32 h (.f32 eta eta)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))
(/.f32 h (*.f32 eta eta))
(*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))
(tan.f32 (asin.f32 sinTheta_O))
(asin.f32 sinTheta_O)
#s(literal 1/2 binary32)

Outputs
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ 1 eta)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* 1 (* 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 (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))
#s(approx (* 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (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 (sin (acos sinTheta_O)) #s(hole binary32 (sin (acos sinTheta_O))))
#s(approx (acos sinTheta_O) #s(hole binary32 (acos sinTheta_O)))
#s(approx (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) #s(hole binary32 (- (* 1/2 (PI)) (acos (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))))
#s(approx (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (acos (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow eta 2)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ (pow eta 2) (pow sinTheta_O 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) (pow sinTheta_O 2))))
#s(approx (* (/ eta sinTheta_O) (/ eta sinTheta_O)) #s(hole binary32 (/ (pow eta 2) (pow sinTheta_O 2))))
#s(approx (/ eta sinTheta_O) #s(hole binary32 (/ eta sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow eta 2)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (pow eta 2) (pow sinTheta_O 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1 (pow sinTheta_O 2)) (pow eta 2)) (pow sinTheta_O 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2)) (pow sinTheta_O 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (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)) (pow sinTheta_O 2))))
#s(approx (/ (* eta eta) (* sinTheta_O sinTheta_O)) #s(hole binary32 (/ (pow eta 2) (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 (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (/ h eta)))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (cos (asin sinTheta_O))))) (/ h eta))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 h))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O))))))))
#s(approx (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O)))))))
#s(approx (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) #s(hole binary32 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O))))))
#s(approx (* sinTheta_O (tan (asin sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (cos (asin sinTheta_O)))))
#s(approx (tan (asin sinTheta_O)) #s(hole binary32 (/ sinTheta_O (cos (asin sinTheta_O)))))
#s(approx (asin sinTheta_O) #s(hole binary32 (asin sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (/ (* 1 (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ -1 (sin (acos sinTheta_O)))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (+ (* -1 (sqrt -1)) (/ (pow eta 2) sinTheta_O)))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (+ (* -1 (sqrt -1)) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (+ (* -1 (sqrt -1)) (+ (* 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)))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (sqrt -1) sinTheta_O))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (- (/ (pow eta 2) sinTheta_O) (sqrt -1)) sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)) sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (- (+ (* 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)) sinTheta_O)))
#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 (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (cos (asin sinTheta_O)))))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (* sinTheta_O (+ (* 1/2 (/ (* h sinTheta_O) (* (pow eta 3) (cos (asin sinTheta_O))))) (/ h (* eta sinTheta_O))))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O)))))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (* sinTheta_O (+ (* 1/2 (/ (* h sinTheta_O) (* (pow eta 2) (cos (asin sinTheta_O))))) (/ h 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 (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (sqrt -1)) (* -1 (/ (pow eta 2) sinTheta_O)))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (sqrt -1)) (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (sqrt -1)) (* -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)))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (sqrt -1) sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1)) sinTheta_O))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1)) sinTheta_O))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (- (* -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)) sinTheta_O))))
#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 (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (/ h (* eta sinTheta_O))) (* -1/2 (/ (* h sinTheta_O) (* (pow eta 3) (cos (asin sinTheta_O))))))))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (/ h sinTheta_O)) (* -1/2 (/ (* h sinTheta_O) (* (pow eta 2) (cos (asin sinTheta_O))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx h #s(hole binary32 h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (/ (* h (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (cos (asin sinTheta_O))))))) eta)))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (* h (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (cos (asin sinTheta_O)))))))))
#s(approx (/ h (* eta eta)) #s(hole binary32 (/ h (pow eta 2))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (* -1 (/ (* h (- (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (cos (asin sinTheta_O))))) 1)) eta))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (* -1 (* h (- (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (cos (asin 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 (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx eta #s(hole binary32 eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (pow eta 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (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 (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (/ (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (cos (asin sinTheta_O)))) (* (pow eta 2) h)) (pow eta 3))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (/ (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (cos (asin sinTheta_O)))) (* (pow eta 2) h)) (pow eta 2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (* (pow eta 2) (sin (acos sinTheta_O))))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ (* -1 (* (/ 1 (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (/ 1 (pow sinTheta_O 2))))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ -1 eta)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (* -1 (/ (+ (* -1 h) (* -1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O)))))) eta))))

Calls

9 calls:

Time	Variable		Point	Expression
27.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))))))) (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) (* eta eta) eta (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))) (* 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) sinTheta_O (sin (acos sinTheta_O)) (acos sinTheta_O) h (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* (/ eta sinTheta_O) (/ eta sinTheta_O)) (/ eta sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* 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) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O))) (tan (asin sinTheta_O)) (asin sinTheta_O) 1/2)
17.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))))))) (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) (* eta eta) eta (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))) (* 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) sinTheta_O (sin (acos sinTheta_O)) (acos sinTheta_O) h (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* (/ eta sinTheta_O) (/ eta sinTheta_O)) (/ eta sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* 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) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O))) (tan (asin sinTheta_O)) (asin sinTheta_O) 1/2)
11.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))))))) (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) (* eta eta) eta (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))) (* 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) sinTheta_O (sin (acos sinTheta_O)) (acos sinTheta_O) h (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* (/ eta sinTheta_O) (/ eta sinTheta_O)) (/ eta sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* 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) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O))) (tan (asin sinTheta_O)) (asin sinTheta_O) 1/2)
9.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))))))) (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) (* eta eta) eta (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))) (* 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) sinTheta_O (sin (acos sinTheta_O)) (acos sinTheta_O) h (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* (/ eta sinTheta_O) (/ eta sinTheta_O)) (/ eta sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* 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) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O))) (tan (asin sinTheta_O)) (asin sinTheta_O) 1/2)
9.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))))))) (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))))) (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) (* eta eta) eta (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))) (* 1 (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O) sinTheta_O (sin (acos sinTheta_O)) (acos sinTheta_O) h (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* (/ eta sinTheta_O) (/ eta sinTheta_O)) (/ eta sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* 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) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O))) (tan (asin sinTheta_O)) (asin sinTheta_O) 1/2)

rewrite272.0ms (5.6%)

Memory

1.8MiB live, 195.8MiB allocated; 117ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1399	18043
0	1469	14399
1	7713	14399
0	8074	14399

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

372 → 573

Calls

Call 1

Inputs
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h))
(.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))))
#s(literal 1 binary32)
(sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))
(-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 eta eta)
eta
(/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
(.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
sinTheta_O
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
h
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(/.f32 (PI.f32) #s(literal 2 binary32))
(PI.f32)
#s(literal 2 binary32)
(acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))
(.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O)))
(*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))
(/.f32 eta sinTheta_O)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.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))))) (*.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O))))) h))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O))))) h)
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.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))))) (*.f32 sinTheta_O sinTheta_O)))
(.f32 (-.f32 (/.f32 (.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))))) (*.f32 sinTheta_O sinTheta_O))
(-.f32 (/.f32 (.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)))))
(/.f32 (.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) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta))
(/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta)
(+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h)
(.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32))
(.f32 (/.f32 h (.f32 eta eta)) (*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O))))
(/.f32 h (*.f32 eta eta))
(*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))
(tan.f32 (asin.f32 sinTheta_O))
(asin.f32 sinTheta_O)
#s(literal 1/2 binary32)
#s(approx (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (asin (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ 1 eta)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))))) #s(hole binary32 eta))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (/ (* 1 (* 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 (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))
#s(approx (* 1 (* sinTheta_O sinTheta_O)) #s(hole binary32 (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 (sin (acos sinTheta_O)) #s(hole binary32 (sin (acos sinTheta_O))))
#s(approx (acos sinTheta_O) #s(hole binary32 (acos sinTheta_O)))
#s(approx (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) #s(hole binary32 (- (* 1/2 (PI)) (acos (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))))
#s(approx (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) #s(hole binary32 (acos (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ h eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (pow eta 3))) (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))))))) (* 1/2 (/ h (pow eta 3))))) (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (pow eta 3))) (* (pow sinTheta_O 2) (+ (* 1/2 (* eta (* h (* (pow sinTheta_O 2) (- (+ (* 3/8 (/ 1 (pow eta 4))) (* 1/2 (/ 1 (pow eta 6)))) (+ (* -1 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (/ 1 (pow eta 6))) (pow eta 2))) (* 1/2 (/ (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6)))) (pow eta 2))))))))) (* 1/2 (* eta (* h (+ (* 1/2 (/ 1 (pow eta 4))) (* 3/4 (/ 1 (pow eta 6))))))))))) (/ h eta))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* -1/2 (/ (pow sinTheta_O 2) eta)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* -1/2 (/ (* (pow sinTheta_O 2) (+ 1/2 (* 1/4 (/ 1 (pow eta 2))))) eta)) (* 1/2 (/ 1 eta)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ eta (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (+ (* -1/2 (/ (* (pow sinTheta_O 2) (+ 3/8 (* 1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) (pow eta 2))))) eta)) (* -1/2 (/ (+ 1/2 (* 1/4 (/ 1 (pow eta 2)))) eta)))) (* 1/2 (/ 1 eta)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (* h (pow sinTheta_O 2)) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 1/2 (/ h (* (pow eta 3) (sin (acos sinTheta_O))))) (* (pow sinTheta_O 2) (+ (* 5/16 (/ (* h (pow sinTheta_O 2)) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ h (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))))) (/ h eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ 1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 3) (sin (acos sinTheta_O))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* 3/8 (/ (pow sinTheta_O 2) (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (* 5/16 (/ (pow sinTheta_O 2) (* (pow eta 7) (pow (sin (acos sinTheta_O)) 3)))) (* 3/8 (/ 1 (* (pow eta 5) (pow (sin (acos sinTheta_O)) 2)))))) (* 1/2 (/ 1 (* (pow eta 3) (sin (acos sinTheta_O))))))) (/ 1 eta))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ 1 (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (/ 1 (pow eta 2)) (/ (pow sinTheta_O 2) (* (pow eta 4) (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))) (/ (pow sinTheta_O 2) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))))) (/ 1 (pow eta 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* (pow sinTheta_O 2) (+ (* (pow sinTheta_O 2) (+ (/ 1 (* (pow eta 6) (pow (sin (acos sinTheta_O)) 2))) (/ (pow sinTheta_O 2) (* (pow eta 8) (pow (sin (acos sinTheta_O)) 3))))) (/ 1 (* (pow eta 4) (sin (acos sinTheta_O)))))) (/ 1 (pow eta 2)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (pow eta 2)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow eta 2)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ (pow eta 2) (pow sinTheta_O 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))) (pow eta 2)) (pow sinTheta_O 2))))
#s(approx (* (/ eta sinTheta_O) (/ eta sinTheta_O)) #s(hole binary32 (/ (pow eta 2) (pow sinTheta_O 2))))
#s(approx (/ eta sinTheta_O) #s(hole binary32 (/ eta sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (pow eta 2)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* -1 (pow sinTheta_O 2)) (pow eta 2))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* (pow sinTheta_O 2) (- (* (pow sinTheta_O 2) (- (* -3/8 (pow sinTheta_O 2)) 1/2)) 1)) (pow eta 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (pow eta 2) (pow sinTheta_O 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1 (pow sinTheta_O 2)) (pow eta 2)) (pow sinTheta_O 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* (pow sinTheta_O 2) (- (* -1/2 (pow sinTheta_O 2)) 1)) (pow eta 2)) (pow sinTheta_O 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (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)) (pow sinTheta_O 2))))
#s(approx (/ (* eta eta) (* sinTheta_O sinTheta_O)) #s(hole binary32 (/ (pow eta 2) (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 (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (/ h eta)))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (cos (asin sinTheta_O))))) (/ h eta))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 h))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O))))))))
#s(approx (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O)))))))
#s(approx (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) #s(hole binary32 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O))))))
#s(approx (* sinTheta_O (tan (asin sinTheta_O))) #s(hole binary32 (/ (pow sinTheta_O 2) (cos (asin sinTheta_O)))))
#s(approx (tan (asin sinTheta_O)) #s(hole binary32 (/ sinTheta_O (cos (asin sinTheta_O)))))
#s(approx (asin sinTheta_O) #s(hole binary32 (asin sinTheta_O)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (/ (* 1 (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (sqrt -1) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* h (+ (* 1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ 1 (* (pow sinTheta_O 7) (sqrt -1)))))) (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ 1 (* (pow sinTheta_O 5) (sqrt -1)))))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 5)))))) (* h (sqrt (/ (sqrt -1) sinTheta_O))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (sqrt (* sinTheta_O (pow (sqrt -1) 3)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)) (+ (* -1/8 (* (pow eta 4) (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 9)))))) (+ (* 1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2))) (pow sinTheta_O 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ (* -1 (sin (acos sinTheta_O))) (* -1 (/ (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 6)))) (+ (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 2)) (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 4)))) (pow sinTheta_O 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow sinTheta_O 2) (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O)))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (/ -1 (sin (acos sinTheta_O)))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (- (/ (pow eta 2) (pow sinTheta_O 2)) (/ 1 (sin (acos sinTheta_O))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (sqrt -1)))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (+ (* -1 (sqrt -1)) (/ (pow eta 2) sinTheta_O)))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (+ (* -1 (sqrt -1)) (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (+ (* -1 (sqrt -1)) (+ (* 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)))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (sqrt -1) sinTheta_O))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (- (/ (pow eta 2) sinTheta_O) (sqrt -1)) sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow sinTheta_O 2) (sqrt -1))) (/ (pow eta 2) sinTheta_O)) (sqrt -1)) sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (- (+ (* 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)) sinTheta_O)))
#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 (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 3) (cos (asin sinTheta_O)))))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (* sinTheta_O (+ (* 1/2 (/ (* h sinTheta_O) (* (pow eta 3) (cos (asin sinTheta_O))))) (/ h (* eta sinTheta_O))))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O)))))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (* sinTheta_O (+ (* 1/2 (/ (* h sinTheta_O) (* (pow eta 2) (cos (asin sinTheta_O))))) (/ h 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 (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (+ (* 1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (/ (sqrt -1) (pow sinTheta_O 5))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* -1 (/ (+ (* -1/2 (* (* h (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt (* sinTheta_O (sqrt -1))))) (* 1/2 (* (* h (+ (* -1/4 (/ (* (pow eta 4) sinTheta_O) (pow (sqrt -1) 5))) (+ (* 1/2 (/ (pow eta 2) (pow (sqrt -1) 4))) (/ (* (pow eta 2) (+ (* 1/2 (/ 1 (pow (sqrt -1) 3))) (/ (pow eta 4) (pow (sqrt -1) 3)))) (sqrt -1))))) (sqrt (/ (sqrt -1) sinTheta_O))))) (pow sinTheta_O 3))) (+ (* -1/2 (* (* (pow eta 2) h) (sqrt (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3)))))) (* h (sqrt (/ (pow (sqrt -1) 3) sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (sqrt (* sinTheta_O (pow (sqrt -1) 5))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1/4 (sqrt (/ 1 (* (pow sinTheta_O 5) (pow (sqrt -1) 3))))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* sinTheta_O (+ (sqrt (/ (pow (sqrt -1) 5) sinTheta_O)) (+ (* -1 (/ (+ (* 1/8 (* (pow eta 4) (sqrt (/ sinTheta_O (pow (sqrt -1) 7))))) (* 1/4 (sqrt (/ sinTheta_O (pow (sqrt -1) 3))))) (pow sinTheta_O 3))) (* 1/2 (* (pow eta 2) (sqrt (/ 1 (* (pow sinTheta_O 3) (sqrt -1))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O)))))) sinTheta_O))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (* h (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* h (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4)))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (* h (sqrt -1)) (sqrt (sin (acos sinTheta_O))))))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1)))) sinTheta_O))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (* (/ (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))) (* (pow sinTheta_O 4) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (+ (* 1/2 (/ (* (pow eta 2) (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3)) (pow (sqrt -1) 2))) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 3))))) (pow (sqrt -1) 2))) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 4))) (* (pow sinTheta_O 6) (sqrt -1))) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 2) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (sqrt (sin (acos sinTheta_O))) (sqrt -1))))) sinTheta_O))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* sinTheta_O (sqrt -1))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (sqrt -1)) (* -1 (/ (pow eta 2) sinTheta_O)))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (sqrt -1)) (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (sqrt -1)) (* -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)))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (sqrt -1) sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (pow eta 2) sinTheta_O)) (sqrt -1)) sinTheta_O))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (pow eta 2) (* 1/2 (/ 1 (* sinTheta_O (sqrt -1))))) sinTheta_O)) (sqrt -1)) sinTheta_O))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (- (* -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)) sinTheta_O))))
#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 (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (/ h (* eta sinTheta_O))) (* -1/2 (/ (* h sinTheta_O) (* (pow eta 3) (cos (asin sinTheta_O))))))))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (* -1 (* sinTheta_O (+ (* -1 (/ h sinTheta_O)) (* -1/2 (/ (* h sinTheta_O) (* (pow eta 2) (cos (asin sinTheta_O))))))))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx h #s(hole binary32 h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* h (sqrt (/ 1 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O)))))))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (/ (* h (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (cos (asin sinTheta_O))))))) eta)))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (* h (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (cos (asin sinTheta_O)))))))))
#s(approx (/ h (* eta eta)) #s(hole binary32 (/ h (pow eta 2))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (* -1 (/ (* h (- (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (cos (asin sinTheta_O))))) 1)) eta))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (* -1 (* h (- (* -1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (cos (asin 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 (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* eta eta) #s(hole binary32 (pow eta 2)))
#s(approx eta #s(hole binary32 eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))))) (sqrt -1)))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))) (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (sqrt -1)))) (* (pow eta 2) (+ (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (* sinTheta_O (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) (sqrt -1)))) (* -1/2 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* -1 (/ (* (- 1 (pow sinTheta_O 2)) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4)))) (pow sinTheta_O 4))) (* -1/2 (* (/ (* (pow sinTheta_O 2) (* (+ (* -1 (* (/ (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) (pow sinTheta_O 2)) (sqrt (- 1 (pow sinTheta_O 2))))) (* 1/4 (* (/ (* (pow sinTheta_O 2) (pow (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))) 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (pow sinTheta_O 4))))) (pow (sqrt -1) 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))) (sqrt -1)))))))) (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (* h (sqrt -1)) sinTheta_O)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ (pow eta 2) (* sinTheta_O (sqrt -1))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (+ (* (pow eta 2) (+ (* 1/2 (* (pow (* 1 (- 1 (pow sinTheta_O 2))) 1/4) (/ 1 (* sinTheta_O (sqrt -1))))) (* (pow eta 2) (+ (* -1/8 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 3)) 1/4) (/ 1 (* (pow sinTheta_O 3) (pow (sqrt -1) 3))))) (* 1/16 (* (pow (* 1 (pow (- 1 (pow sinTheta_O 2)) 5)) 1/4) (/ (pow eta 2) (* (pow sinTheta_O 5) (pow (sqrt -1) 5))))))))) (* (pow (/ 1 (- 1 (pow sinTheta_O 2))) 1/4) (* sinTheta_O (sqrt -1))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* -1/2 (* (/ (* (pow eta 2) h) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (+ (* (/ (* h (sqrt -1)) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ h (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* h (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* h (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8)))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* -1/2 (* (/ (pow eta 2) (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (+ (* (/ (sqrt -1) sinTheta_O) (sqrt (sin (acos sinTheta_O)))) (* (pow eta 2) (+ (* -1/2 (* (/ 1 (* (pow sinTheta_O 3) (sqrt -1))) (sqrt (pow (sin (acos sinTheta_O)) 3)))) (* (pow eta 2) (+ (* -1/2 (* (/ (* sinTheta_O (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))) (* -1/2 (* (/ (* (pow eta 2) (* sinTheta_O (+ (* 1/2 (/ (* (sin (acos sinTheta_O)) (+ (* 1/4 (/ (pow (sin (acos sinTheta_O)) 3) (* (pow sinTheta_O 6) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (* (pow sinTheta_O 2) (pow (sqrt -1) 2)))) (/ (pow (sin (acos sinTheta_O)) 4) (pow sinTheta_O 8))))) (sqrt -1)) (sqrt (/ 1 (sin (acos sinTheta_O)))))))))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 2)) (pow sinTheta_O 4))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 3)) (pow sinTheta_O 6))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (+ (* -1 (/ (sin (acos sinTheta_O)) (pow sinTheta_O 2))) (* (pow eta 2) (- (* (pow eta 2) (- (* -1 (/ (* (pow eta 2) (pow (sin (acos sinTheta_O)) 4)) (pow sinTheta_O 8))) (/ (pow (sin (acos sinTheta_O)) 3) (pow sinTheta_O 6)))) (/ (pow (sin (acos sinTheta_O)) 2) (pow sinTheta_O 4)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (- (pow eta 2) (/ (pow sinTheta_O 2) (sin (acos sinTheta_O))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (+ (* -1 (* (pow sinTheta_O 2) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (pow eta 2))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (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 (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (/ (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (cos (asin sinTheta_O)))) (* (pow eta 2) h)) (pow eta 3))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) #s(hole binary32 (/ (+ (* 1/2 (/ (* h (pow sinTheta_O 2)) (cos (asin sinTheta_O)))) (* (pow eta 2) h)) (pow eta 2))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3)))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (+ 1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))) (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) (pow eta 2))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) #s(hole binary32 (/ (- (+ 1 (/ (pow sinTheta_O 6) (* (pow eta 6) (pow (sin (acos sinTheta_O)) 3)))) (+ (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))) (* -1 (/ (pow sinTheta_O 4) (* (pow eta 4) (pow (sin (acos sinTheta_O)) 2)))))) (pow eta 2))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) #s(hole binary32 (* (pow eta 2) (- (/ 1 (pow sinTheta_O 2)) (/ 1 (* (pow eta 2) (sin (acos sinTheta_O))))))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) #s(hole binary32 (* (pow eta 2) (+ 1 (* -1 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* (pow eta 2) (+ (* -1 (* (/ 1 (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (/ 1 (pow sinTheta_O 2))))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (/ -1 eta)))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (/ 1 (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O)))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* sinTheta_O sinTheta_O)) (sin (acos sinTheta_O))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (* eta eta) (/ (* 1 (* 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) (/ (* 1 (* 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) (/ (* 1 (* 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 (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) eta))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (* (pow sinTheta_O 6) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))) (* -1/2 (* (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))) (pow eta 6))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))) (* 1/4 (/ (pow sinTheta_O 4) (- 1 (pow sinTheta_O 2)))))) (pow eta 4))) (* 1/2 (* (/ (* h (pow sinTheta_O 2)) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2))))))))) eta))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2)))))))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(hole binary32 (* -1 (* eta (+ 1 (+ (* -1/2 (* (/ (pow sinTheta_O 2) (pow eta 2)) (sqrt (/ 1 (- 1 (pow sinTheta_O 2)))))) (+ (* -1/8 (/ (pow sinTheta_O 4) (* (pow eta 4) (- 1 (pow sinTheta_O 2))))) (* -1/16 (* (/ (pow sinTheta_O 6) (pow eta 6)) (sqrt (/ 1 (pow (- 1 (pow sinTheta_O 2)) 3))))))))))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ h eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) #s(hole binary32 (* -1 (/ (+ h (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (pow eta 4))) (+ (* -1/2 (/ (* h (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O)))))) (pow eta 6))) (* 1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (/ -1 eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O))))))) eta))))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) #s(hole binary32 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2)))) (pow eta 4))) (+ (* -1/2 (/ (+ (* -1 (/ (pow sinTheta_O 6) (pow (sin (acos sinTheta_O)) 3))) (* -1/2 (/ (* (pow sinTheta_O 2) (+ (* -1 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))) (* 1/4 (/ (pow sinTheta_O 4) (pow (sin (acos sinTheta_O)) 2))))) (sin (acos sinTheta_O))))) (pow eta 6))) (* 1/2 (/ (pow sinTheta_O 2) (* (pow eta 2) (sin (acos sinTheta_O)))))))) eta))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) #s(hole binary32 (* -1 (/ (+ (* -1 h) (* -1/2 (/ (* h (pow sinTheta_O 2)) (* (pow eta 2) (cos (asin sinTheta_O)))))) eta))))

Outputs
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))))))
(asin.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))) h)
(.f32 h (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))))
(/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))))
(/.f32 #s(literal -1 binary32) (neg.f32 (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))))
(pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))) #s(literal 1/2 binary32))
(pow.f32 (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))) #s(literal -1 binary32))
#s(literal 1 binary32)
(sqrt.f32 (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
(pow.f32 (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32))
(/.f32 (-.f32 (pow.f32 eta #s(literal 4 binary32)) (.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))) (+.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
(/.f32 (-.f32 (.f32 (neg.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) (neg.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))) (pow.f32 eta #s(literal 4 binary32))) (-.f32 (neg.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) (*.f32 eta eta)))
(/.f32 (-.f32 (pow.f32 (.f32 eta eta) #s(literal 3 binary32)) (pow.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) #s(literal 3 binary32))) (+.f32 (pow.f32 eta #s(literal 4 binary32)) (+.f32 (.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) (.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))))
(/.f32 (+.f32 (pow.f32 (neg.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 3 binary32)) (pow.f32 (.f32 eta eta) #s(literal 3 binary32))) (+.f32 (.f32 (neg.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) (neg.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))) (-.f32 (pow.f32 eta #s(literal 4 binary32)) (.f32 (neg.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) (.f32 eta eta)))))
(-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))
(+.f32 (neg.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) (.f32 eta eta))
(+.f32 (.f32 eta eta) (.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 sinTheta_O sinTheta_O)))
(+.f32 (.f32 eta eta) (neg.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
(*.f32 (pow.f32 eta #s(literal 1 binary32)) (pow.f32 eta #s(literal 1 binary32)))
(*.f32 (neg.f32 eta) (neg.f32 eta))
(*.f32 (fabs.f32 eta) (fabs.f32 eta))
(*.f32 (exp.f32 (log.f32 eta)) (exp.f32 (log.f32 eta)))
(*.f32 eta eta)
(pow.f32 (exp.f32 (log.f32 eta)) #s(literal 2 binary32))
(pow.f32 eta #s(literal 2 binary32))
(+.f32 (cosh.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (sinh.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 eta) #s(literal 2 binary32)))
eta
(.f32 (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) sinTheta_O) sinTheta_O)
(*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)
(.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (.f32 sinTheta_O sinTheta_O))
(.f32 (.f32 sinTheta_O sinTheta_O) (cosh.f32 (atanh.f32 sinTheta_O)))
(.f32 #s(literal 1 binary32) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))
(*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))
(.f32 (.f32 #s(literal 1 binary32) 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 (.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
(.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(+.f32 (cosh.f32 (.f32 (log.f32 sinTheta_O) #s(literal 2 binary32))) (sinh.f32 (.f32 (log.f32 sinTheta_O) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
(.f32 (.f32 #s(literal 1 binary32) 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 (.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32))
(.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(pow.f32 sinTheta_O #s(literal 2 binary32))
(+.f32 (cosh.f32 (.f32 (log.f32 sinTheta_O) #s(literal 2 binary32))) (sinh.f32 (.f32 (log.f32 sinTheta_O) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 sinTheta_O) #s(literal 2 binary32)))
sinTheta_O
(sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(-.f32 (.f32 (sin.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (sin.f32 (acos.f32 sinTheta_O))) (.f32 (cos.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) sinTheta_O))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (+.f32 (asin.f32 (neg.f32 sinTheta_O)) (/.f32 (PI.f32) #s(literal 2 binary32))))
(sin.f32 (acos.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(sin.f32 (acos.f32 (neg.f32 sinTheta_O)))
(sin.f32 (acos.f32 (fabs.f32 sinTheta_O)))
(sin.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))))
(sin.f32 (acos.f32 sinTheta_O))
(+.f32 (.f32 (cos.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (cos.f32 (acos.f32 sinTheta_O))) (.f32 (sin.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (sin.f32 (acos.f32 sinTheta_O))))
(+.f32 (.f32 sinTheta_O (cos.f32 (/.f32 (PI.f32) #s(literal 2 binary32)))) (.f32 (sin.f32 (acos.f32 sinTheta_O)) (sin.f32 (/.f32 (PI.f32) #s(literal 2 binary32)))))
(cos.f32 (neg.f32 (asin.f32 (neg.f32 sinTheta_O))))
(cos.f32 (asin.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(cos.f32 (asin.f32 (fabs.f32 sinTheta_O)))
(cos.f32 (asin.f32 (neg.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)
h
(/.f32 (-.f32 (.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))) (+.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) #s(literal 3 binary32))) (+.f32 (.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))) (.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp ( (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 (neg.f32 (PI.f32)) #s(literal -2 binary32))
(/.f32 (PI.f32) #s(literal 2 binary32))
(PI.f32)
#s(literal 2 binary32)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (asin.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 (neg.f32 h) (neg.f32 #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))))))) h))))
(asin.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))))))) h)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))))))) h))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))))))) h)
(.f32 h (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))))))))
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)))))))
(/.f32 #s(literal 1 binary32) (sqrt.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)))))))
(pow.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)))))) #s(literal 1/2 binary32))
(/.f32 #s(literal -1 binary32) (neg.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)))))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))))))
(pow.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))))) #s(literal -1 binary32))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)))))
(.f32 (.f32 #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))) sinTheta_O) sinTheta_O)
(.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))))
(.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))) (*.f32 sinTheta_O sinTheta_O))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)))
(*.f32 (neg.f32 (/.f32 eta sinTheta_O)) (neg.f32 (/.f32 eta sinTheta_O)))
(*.f32 (fabs.f32 (/.f32 eta sinTheta_O)) (fabs.f32 (/.f32 eta sinTheta_O)))
(*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))
(.f32 eta (/.f32 eta (.f32 sinTheta_O sinTheta_O)))
(/.f32 (*.f32 eta (/.f32 eta sinTheta_O)) sinTheta_O)
(/.f32 (*.f32 (/.f32 eta sinTheta_O) eta) sinTheta_O)
(/.f32 (neg.f32 (.f32 eta eta)) (neg.f32 (.f32 sinTheta_O sinTheta_O)))
(/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) sinTheta_O)
(/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O))
(pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))
(/.f32 (neg.f32 eta) (neg.f32 sinTheta_O))
(/.f32 eta sinTheta_O)
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h))))
(asin.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h))
(.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)
(.f32 h (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))))
(sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) (sqrt.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))
(pow.f32 (/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))) #s(literal 1/2 binary32))
(/.f32 #s(literal -1 binary32) (neg.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))
(/.f32 #s(literal 1 binary32) #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))
(pow.f32 #s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))) #s(literal -1 binary32))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))
(.f32 (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) sinTheta_O) sinTheta_O)
(.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))
(.f32 (.f32 sinTheta_O sinTheta_O) (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))))
(/.f32 (-.f32 (.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))) (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O)))) (+.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))))
(/.f32 (-.f32 (pow.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (cosh.f32 (atanh.f32 sinTheta_O)) #s(literal 3 binary32))) (+.f32 (.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))) (+.f32 (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (cosh.f32 (atanh.f32 sinTheta_O))) (*.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))))))
(/.f32 (-.f32 (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))
(-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O)))
(*.f32 (neg.f32 (/.f32 eta sinTheta_O)) (neg.f32 (/.f32 eta sinTheta_O)))
(*.f32 (fabs.f32 (/.f32 eta sinTheta_O)) (fabs.f32 (/.f32 eta sinTheta_O)))
(*.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))
(.f32 eta (/.f32 eta (.f32 sinTheta_O sinTheta_O)))
(/.f32 (*.f32 eta (/.f32 eta sinTheta_O)) sinTheta_O)
(/.f32 (*.f32 (/.f32 eta sinTheta_O) eta) sinTheta_O)
(/.f32 (neg.f32 (.f32 eta eta)) (neg.f32 (.f32 sinTheta_O sinTheta_O)))
(/.f32 (/.f32 (*.f32 eta eta) sinTheta_O) sinTheta_O)
(/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O))
(pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32))
(sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))
(/.f32 (+.f32 (exp.f32 (atanh.f32 sinTheta_O)) (exp.f32 (neg.f32 (atanh.f32 sinTheta_O)))) #s(literal 2 binary32))
(/.f32 #s(literal -1 binary32) (sin.f32 (neg.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)))
(-.f32 (.f32 (sin.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (sin.f32 (acos.f32 sinTheta_O))) (.f32 (cos.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) sinTheta_O))
(pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)) #s(literal 1/2 binary32))
(sin.f32 (+.f32 (asin.f32 (neg.f32 sinTheta_O)) (/.f32 (PI.f32) #s(literal 2 binary32))))
(sin.f32 (acos.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(sin.f32 (acos.f32 (neg.f32 sinTheta_O)))
(sin.f32 (acos.f32 (fabs.f32 sinTheta_O)))
(sin.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))))
(sin.f32 (acos.f32 sinTheta_O))
(+.f32 (.f32 (cos.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (cos.f32 (acos.f32 sinTheta_O))) (.f32 (sin.f32 (/.f32 (PI.f32) #s(literal 2 binary32))) (sin.f32 (acos.f32 sinTheta_O))))
(+.f32 (.f32 sinTheta_O (cos.f32 (/.f32 (PI.f32) #s(literal 2 binary32)))) (.f32 (sin.f32 (acos.f32 sinTheta_O)) (sin.f32 (/.f32 (PI.f32) #s(literal 2 binary32)))))
(cos.f32 (neg.f32 (asin.f32 (neg.f32 sinTheta_O))))
(cos.f32 (asin.f32 (pow.f32 sinTheta_O #s(literal 1 binary32))))
(cos.f32 (asin.f32 (fabs.f32 sinTheta_O)))
(cos.f32 (asin.f32 (neg.f32 sinTheta_O)))
(cos.f32 (asin.f32 sinTheta_O))
(*.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 1 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 1 binary32)))
(.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32))
(*.f32 (sin.f32 (acos.f32 sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))
(.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))
(/.f32 (+.f32 (sin.f32 (-.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))) (asin.f32 (neg.f32 sinTheta_O)))) (sin.f32 (+.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))) (asin.f32 (neg.f32 sinTheta_O))))) #s(literal 2 binary32))
(/.f32 (+.f32 (sin.f32 (-.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))) (asin.f32 sinTheta_O))) (sin.f32 (+.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))) (asin.f32 sinTheta_O)))) #s(literal 2 binary32))
(/.f32 (+.f32 (sin.f32 (-.f32 (acos.f32 sinTheta_O) (asin.f32 (neg.f32 sinTheta_O)))) (sin.f32 (+.f32 (acos.f32 sinTheta_O) (asin.f32 (neg.f32 sinTheta_O))))) #s(literal 2 binary32))
(/.f32 (+.f32 (sin.f32 (-.f32 (acos.f32 sinTheta_O) (asin.f32 sinTheta_O))) (sin.f32 (+.f32 (acos.f32 sinTheta_O) (asin.f32 sinTheta_O)))) #s(literal 2 binary32))
(/.f32 (-.f32 (cos.f32 (-.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))))) (cos.f32 (+.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))) (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32)))))) #s(literal 2 binary32))
(/.f32 (-.f32 (cos.f32 (-.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))) (acos.f32 sinTheta_O))) (cos.f32 (+.f32 (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))) (acos.f32 sinTheta_O)))) #s(literal 2 binary32))
(/.f32 (-.f32 (cos.f32 (-.f32 (acos.f32 sinTheta_O) (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32))))) (cos.f32 (+.f32 (acos.f32 sinTheta_O) (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32)))))) #s(literal 2 binary32))
(/.f32 (-.f32 (cos.f32 (-.f32 (acos.f32 sinTheta_O) (acos.f32 sinTheta_O))) (cos.f32 (+.f32 (acos.f32 sinTheta_O) (acos.f32 sinTheta_O)))) #s(literal 2 binary32))
(/.f32 (+.f32 (cos.f32 (+.f32 (asin.f32 (neg.f32 sinTheta_O)) (asin.f32 (neg.f32 sinTheta_O)))) (cos.f32 (-.f32 (asin.f32 (neg.f32 sinTheta_O)) (asin.f32 (neg.f32 sinTheta_O))))) #s(literal 2 binary32))
(/.f32 (+.f32 (cos.f32 (+.f32 (asin.f32 (neg.f32 sinTheta_O)) (asin.f32 sinTheta_O))) (cos.f32 (-.f32 (asin.f32 (neg.f32 sinTheta_O)) (asin.f32 sinTheta_O)))) #s(literal 2 binary32))
(/.f32 (+.f32 (cos.f32 (+.f32 (asin.f32 sinTheta_O) (asin.f32 (neg.f32 sinTheta_O)))) (cos.f32 (-.f32 (asin.f32 sinTheta_O) (asin.f32 (neg.f32 sinTheta_O))))) #s(literal 2 binary32))
(/.f32 (+.f32 (cos.f32 (+.f32 (asin.f32 sinTheta_O) (asin.f32 sinTheta_O))) (cos.f32 (-.f32 (asin.f32 sinTheta_O) (asin.f32 sinTheta_O)))) #s(literal 2 binary32))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
(/.f32 (-.f32 #s(literal 1 binary32) (.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (neg.f32 (.f32 sinTheta_O sinTheta_O)))) (-.f32 #s(literal 1 binary32) (neg.f32 (.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 sinTheta_O sinTheta_O))))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (neg.f32 (.f32 sinTheta_O sinTheta_O))) (.f32 #s(literal 1 binary32) (neg.f32 (.f32 sinTheta_O sinTheta_O))))))
(-.f32 #s(literal 1/2 binary32) (.f32 #s(literal 1/2 binary32) (cos.f32 (.f32 #s(literal 2 binary32) (+.f32 (asin.f32 sinTheta_O) (/.f32 (PI.f32) #s(literal 2 binary32)))))))
(-.f32 #s(literal 1/2 binary32) (.f32 #s(literal 1/2 binary32) (cos.f32 (.f32 #s(literal 2 binary32) (acos.f32 sinTheta_O)))))
(-.f32 #s(literal 1 binary32) (*.f32 (sin.f32 (asin.f32 (neg.f32 sinTheta_O))) (sin.f32 (asin.f32 (neg.f32 sinTheta_O)))))
(-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))
(pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 2 binary32))
(+.f32 (cosh.f32 (.f32 (log.f32 (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32))) (sinh.f32 (.f32 (log.f32 (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32))))
(+.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) #s(literal 1 binary32))
(+.f32 #s(literal 1/2 binary32) (.f32 #s(literal 1/2 binary32) (cos.f32 (.f32 #s(literal 2 binary32) (asin.f32 (neg.f32 sinTheta_O))))))
(+.f32 #s(literal 1/2 binary32) (.f32 #s(literal 1/2 binary32) (cos.f32 (.f32 #s(literal 2 binary32) (asin.f32 sinTheta_O)))))
(+.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(+.f32 #s(literal 1 binary32) (neg.f32 (*.f32 sinTheta_O sinTheta_O)))
(exp.f32 (*.f32 (log.f32 (sin.f32 (acos.f32 sinTheta_O))) #s(literal 2 binary32)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta))
(/.f32 (neg.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32)))) (neg.f32 eta))
(/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta)
(+.f32 (/.f32 (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) eta) (/.f32 h eta))
(+.f32 (/.f32 h eta) (/.f32 (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) eta))
(/.f32 (-.f32 (.f32 h h) (.f32 (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)))) (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))))
(/.f32 (-.f32 (.f32 (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) (.f32 h h)) (-.f32 (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) h))
(/.f32 (+.f32 (pow.f32 h #s(literal 3 binary32)) (pow.f32 (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) #s(literal 3 binary32))) (+.f32 (.f32 h h) (-.f32 (.f32 (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) (.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))))))
(/.f32 (+.f32 (pow.f32 (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) #s(literal 3 binary32)) (pow.f32 h #s(literal 3 binary32))) (+.f32 (.f32 (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) (-.f32 (.f32 h h) (.f32 (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) h))))
(-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32)))
(+.f32 (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)) h)
(+.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)))
(.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))
(.f32 (/.f32 (/.f32 h eta) eta) (.f32 (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) #s(literal 1/2 binary32)))
(.f32 #s(literal 1/2 binary32) (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))
(/.f32 (.f32 #s(literal 1/2 binary32) (.f32 (.f32 sinTheta_O sinTheta_O) h)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))
(.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O)))
(.f32 (/.f32 (/.f32 h eta) eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))
(.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (/.f32 (/.f32 h eta) eta))
(.f32 h (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))
(/.f32 (.f32 h (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) (*.f32 eta eta))
(/.f32 (neg.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h)) (neg.f32 (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))
(/.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (sin.f32 (acos.f32 sinTheta_O)))
(/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))
(/.f32 (neg.f32 h) (neg.f32 (*.f32 eta eta)))
(/.f32 (/.f32 h eta) eta)
(/.f32 h (*.f32 eta eta))
(.f32 (.f32 (cosh.f32 (atanh.f32 sinTheta_O)) sinTheta_O) sinTheta_O)
(*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)
(.f32 (cosh.f32 (atanh.f32 sinTheta_O)) (.f32 sinTheta_O sinTheta_O))
(.f32 (.f32 sinTheta_O sinTheta_O) (cosh.f32 (atanh.f32 sinTheta_O)))
(.f32 #s(literal 1 binary32) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))
(*.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))
(/.f32 (neg.f32 (*.f32 sinTheta_O sinTheta_O)) (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))
(/.f32 (*.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O)))
(/.f32 (+.f32 (tan.f32 (asin.f32 sinTheta_O)) (tan.f32 (PI.f32))) (-.f32 #s(literal 1 binary32) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) (tan.f32 (PI.f32)))))
(/.f32 (sin.f32 (+.f32 (asin.f32 sinTheta_O) (PI.f32))) (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))
(/.f32 (neg.f32 sinTheta_O) (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))
(/.f32 sinTheta_O (sin.f32 (acos.f32 sinTheta_O)))
(tan.f32 (+.f32 (+.f32 (asin.f32 sinTheta_O) (PI.f32)) (PI.f32)))
(tan.f32 (+.f32 (asin.f32 sinTheta_O) (PI.f32)))
(tan.f32 (asin.f32 sinTheta_O))
(sinh.f32 (atanh.f32 sinTheta_O))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 sinTheta_O))
(asin.f32 sinTheta_O)
#s(literal 1/2 binary32)
#s(approx (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (asin.f32 (/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 h eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.f32 (.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32)) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.f32 (+.f32 (/.f32 (.f32 #s(literal 1/2 binary32) h) (.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 (.f32 #s(literal 3/8 binary32) (.f32 (.f32 sinTheta_O sinTheta_O) h)) (.f32 (pow.f32 eta #s(literal 5 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.f32 (+.f32 (.f32 (+.f32 (/.f32 (.f32 #s(literal 3/8 binary32) h) (.f32 (pow.f32 eta #s(literal 5 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) (.f32 (/.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32))) (.f32 sinTheta_O sinTheta_O)) (/.f32 (.f32 #s(literal 1/2 binary32) h) (.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (.f32 sinTheta_O sinTheta_O)) (/.f32 h eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 (.f32 #s(literal 3/8 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (pow.f32 eta #s(literal 5 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (.f32 (+.f32 (/.f32 #s(literal 3/8 binary32) (.f32 (pow.f32 eta #s(literal 5 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) (.f32 (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32))) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) (.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (-.f32 eta (.f32 #s(literal 1/2 binary32) (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) eta) (sin.f32 (acos.f32 sinTheta_O))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (-.f32 (/.f32 (.f32 #s(literal -1/8 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (pow.f32 eta #s(literal 3 binary32)) (-.f32 #s(literal 1 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 (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O 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 eta #s(literal 3 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (.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) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (* sinTheta_O (tan (asin sinTheta_O))) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))
#s(approx (* 1 (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))
#s(approx (* 1 (* sinTheta_O sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))
#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 (- (/ (PI) 2) (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (-.f32 (.f32 (PI.f32) #s(literal 1/2 binary32)) (acos.f32 (/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))))))
#s(approx (acos (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (acos.f32 (/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 h eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 h eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.f32 (.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32)) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.f32 (+.f32 (/.f32 (.f32 #s(literal 1/2 binary32) h) (.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 (.f32 #s(literal 3/8 binary32) (.f32 (.f32 sinTheta_O sinTheta_O) h)) (.f32 (pow.f32 eta #s(literal 5 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 h eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.f32 (+.f32 (.f32 (+.f32 (/.f32 (.f32 #s(literal 3/8 binary32) h) (.f32 (pow.f32 eta #s(literal 5 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) (.f32 (/.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32))) (.f32 sinTheta_O sinTheta_O)) (/.f32 (.f32 #s(literal 1/2 binary32) h) (.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (.f32 sinTheta_O sinTheta_O)) (/.f32 h eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (*.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (/.f32 (.f32 #s(literal 3/8 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (pow.f32 eta #s(literal 5 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (.f32 (+.f32 (/.f32 #s(literal 3/8 binary32) (.f32 (pow.f32 eta #s(literal 5 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) (.f32 (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 7 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 5/16 binary32))) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1/2 binary32) (.f32 (pow.f32 eta #s(literal 3 binary32)) (sin.f32 (acos.f32 sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 (pow.f32 eta #s(literal 4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (+.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 (pow.f32 eta #s(literal 6 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (+.f32 (.f32 (+.f32 (/.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (pow.f32 eta #s(literal 8 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) (/.f32 (pow.f32 eta #s(literal -6 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)) (/.f32 (pow.f32 eta #s(literal -4 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)) (pow.f32 eta #s(literal -2 binary32))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (*.f32 eta eta))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* eta eta) (* sinTheta_O sinTheta_O)) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)))
#s(approx (/ eta sinTheta_O) (/.f32 eta sinTheta_O))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (*.f32 eta eta))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (+.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* 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)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* 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 (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 (+.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta)) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 (+.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)) (.f32 sinTheta_O sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 (+.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)) (.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (* eta eta) (* sinTheta_O sinTheta_O)) (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)))
#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 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O))))
#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 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (/.f32 h eta))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (+.f32 (.f32 (.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32)) (/.f32 h eta)))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) h)
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))))
#s(approx (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)))
#s(approx (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))))
#s(approx (* sinTheta_O (tan (asin sinTheta_O))) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O))
#s(approx (tan (asin sinTheta_O)) (tan.f32 (asin.f32 sinTheta_O)))
#s(approx (asin sinTheta_O) (asin.f32 sinTheta_O))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (+.f32 (.f32 (/.f32 (.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/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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 (.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/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 (.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/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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (*.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 (.f32 (/.f32 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 (.f32 (/.f32 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 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 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32))) (.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (*.f32 sinTheta_O (sqrt.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (sqrt.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (+.f32 (sqrt.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O 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 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (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 #s(literal -1 binary32) #s(literal 3/2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 4 binary32))) (/.f32 (+.f32 (.f32 (/.f32 (.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/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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 (.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/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 (.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/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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (*.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 (.f32 (/.f32 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 (.f32 (/.f32 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 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 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32))) (.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (*.f32 sinTheta_O sinTheta_O))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (.f32 #s(literal -1 binary32) (+.f32 (sin.f32 (acos.f32 sinTheta_O)) (/.f32 (pow.f32 (.f32 (sin.f32 (acos.f32 sinTheta_O)) eta) #s(literal 2 binary32)) (.f32 sinTheta_O sinTheta_O)))) (.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (neg.f32 (/.f32 (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (/.f32 (pow.f32 (.f32 (sin.f32 (acos.f32 sinTheta_O)) eta) #s(literal 2 binary32)) (.f32 sinTheta_O sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (-.f32 (+.f32 (neg.f32 (/.f32 (.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (/.f32 (pow.f32 (.f32 (sin.f32 (acos.f32 sinTheta_O)) eta) #s(literal 2 binary32)) (.f32 sinTheta_O sinTheta_O))) (/.f32 (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (*.f32 sinTheta_O sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (neg.f32 (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (.f32 (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 #s(literal -1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (.f32 (+.f32 (/.f32 (.f32 eta eta) sinTheta_O) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))) sinTheta_O))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* 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)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))) sinTheta_O))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (.f32 (+.f32 (+.f32 (/.f32 #s(literal 3/8 binary32) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (+.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))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))) sinTheta_O))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (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)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 (+.f32 (/.f32 #s(literal 3/8 binary32) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (-.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 (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (-.f32 (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 (* 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 (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (.f32 (.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32)))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (.f32 (+.f32 (/.f32 (/.f32 h eta) sinTheta_O) (.f32 (*.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) sinTheta_O))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32)))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (.f32 (+.f32 (/.f32 h sinTheta_O) (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) sinTheta_O))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 (.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/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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 (.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/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 (.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/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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (*.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 (.f32 (/.f32 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 (.f32 (/.f32 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 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 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32))) (.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (*.f32 sinTheta_O (sqrt.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (.f32 (+.f32 (sqrt.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (.f32 (+.f32 (.f32 (.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 eta #s(literal 4 binary32)) (.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (+.f32 (sqrt.f32 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (sin.f32 (acos.f32 sinTheta_O)))))) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (.f32 (+.f32 (+.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 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (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 #s(literal -1 binary32) #s(literal 3/2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (*.f32 (sqrt.f32 (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O)) h))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (sqrt.f32 (*.f32 (pow.f32 #s(literal -1 binary32) #s(literal 5/2 binary32)) sinTheta_O))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 (.f32 (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (+.f32 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 (.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/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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 (.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/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 (.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/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 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) (.f32 (.f32 #s(literal -1/2 binary32) (*.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (/.f32 h (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 (.f32 (/.f32 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 (.f32 (/.f32 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)))) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (.f32 #s(literal -1/2 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 (.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/4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) #s(literal -1 binary32)) #s(literal 1/2 binary32))) (.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O))))) (+.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) (.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))))) sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (neg.f32 (.f32 (+.f32 (neg.f32 (/.f32 (.f32 eta eta) sinTheta_O)) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))) sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (neg.f32 (.f32 (.f32 #s(literal -1 binary32) (+.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (-.f32 (.f32 eta eta) (/.f32 #s(literal 1/2 binary32) (.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) sinTheta_O))) sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (neg.f32 (.f32 (.f32 #s(literal -1 binary32) (+.f32 (sqrt.f32 #s(literal -1 binary32)) (/.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))) sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (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)) (/ 1 (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)) (/ 1 (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 (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (/.f32 (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32)) sinTheta_O))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (sqrt.f32 #s(literal -1 binary32)) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32)))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (+.f32 (sqrt.f32 #s(literal -1 binary32)) (-.f32 (/.f32 #s(literal -3/8 binary32) (.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (sqrt.f32 #s(literal -1 binary32)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (sqrt.f32 #s(literal -1 binary32))))) sinTheta_O)))
#s(approx (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (neg.f32 (/.f32 (-.f32 (+.f32 (-.f32 (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 (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (neg.f32 (.f32 (-.f32 (/.f32 (neg.f32 h) (.f32 sinTheta_O eta)) (.f32 (.f32 (/.f32 h (pow.f32 eta #s(literal 3 binary32))) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) sinTheta_O)))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (neg.f32 (.f32 (-.f32 (/.f32 (neg.f32 h) sinTheta_O) (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) sinTheta_O)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))))
#s(approx h h)
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (.f32 #s(literal 1 binary32) h) (sqrt.f32 (-.f32 (.f32 eta eta) (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (.f32 h (/.f32 (-.f32 #s(literal 1 binary32) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta)))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (.f32 (-.f32 #s(literal 1 binary32) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) h))
#s(approx (/ h (* eta eta)) (/.f32 (/.f32 h eta) eta))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (/.f32 (.f32 (neg.f32 h) (-.f32 (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32))) eta))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (.f32 (neg.f32 h) (-.f32 (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 sinTheta_O h) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32)))) (.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 sinTheta_O h) (-.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 sinTheta_O h) (-.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 (- (exp (* (log eta) 2)) (/ (* 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 sinTheta_O h) (-.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 sinTheta_O h) (-.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 sinTheta_O h) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (.f32 eta eta)) (.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 sinTheta_O h) (+.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 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (+.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O h) (+.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 sinTheta_O h) (+.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)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (.f32 eta eta)) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (.f32 eta eta)) (/.f32 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (.f32 eta eta) (.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (+.f32 (.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (.f32 (/.f32 (.f32 (.f32 (.f32 eta eta) 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 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (+.f32 (.f32 (.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))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (/.f32 (.f32 (.f32 (.f32 eta eta) 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))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (.f32 eta eta)) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (.f32 eta eta)) (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O 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 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O 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 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O 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 (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (* eta eta) (*.f32 eta eta))
#s(approx eta eta)
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 sinTheta_O h) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (.f32 eta eta)) (sqrt.f32 #s(literal -1 binary32)))) (.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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 sinTheta_O h) (-.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 sinTheta_O h) (-.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 (- (exp (* (log eta) 2)) (/ (* 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 sinTheta_O h) (-.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 sinTheta_O h) (-.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 sinTheta_O h) (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (pow.f32 sinTheta_O #s(literal -4 binary32)))) (sqrt.f32 #s(literal -1 binary32))))) (.f32 eta eta)) (.f32 (pow.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) #s(literal 1/4 binary32)) (.f32 h (/.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))) #s(literal 1/4 binary32)) sinTheta_O) (sqrt.f32 #s(literal -1 binary32))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.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 (- (exp (* (log eta) 2)) (/ (* 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 (- (exp (* (log eta) 2)) (/ (* 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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.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 sinTheta_O h) (+.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 (.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (+.f32 (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (+.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O h) (+.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 sinTheta_O h) (+.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)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (.f32 eta eta)) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 h (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (.f32 eta eta)) (/.f32 (*.f32 h (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O))))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (.f32 eta eta) (.f32 (pow.f32 sinTheta_O #s(literal 3 binary32)) (sqrt.f32 #s(literal -1 binary32))))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (+.f32 (.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32))) (.f32 (/.f32 (.f32 (.f32 (.f32 eta eta) 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 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (+.f32 (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (+.f32 (.f32 (.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))) (sqrt.f32 #s(literal -1 binary32)))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))) (.f32 (/.f32 (.f32 (.f32 (.f32 eta eta) 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))) (sqrt.f32 (cosh.f32 (atanh.f32 sinTheta_O)))))) (.f32 eta eta)) (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 sinTheta_O #s(literal 3 binary32))) (sqrt.f32 #s(literal -1 binary32)))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3/2 binary32)))) (.f32 eta eta)) (/.f32 (sqrt.f32 (sin.f32 (neg.f32 (acos.f32 sinTheta_O)))) sinTheta_O)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (.f32 #s(literal -1 binary32) (+.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 sinTheta_O sinTheta_O)) (/.f32 (pow.f32 (*.f32 (sin.f32 (acos.f32 sinTheta_O)) eta) #s(literal 2 binary32)) (pow.f32 sinTheta_O #s(literal 4 binary32))))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (-.f32 (neg.f32 (.f32 (.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (/.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (.f32 eta eta)) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 sinTheta_O sinTheta_O)))))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (+.f32 (.f32 (-.f32 (.f32 (-.f32 (neg.f32 (.f32 (.f32 eta eta) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 4 binary32)) (pow.f32 sinTheta_O #s(literal 8 binary32))))) (/.f32 (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32)) (pow.f32 sinTheta_O #s(literal 6 binary32)))) (.f32 eta eta)) (/.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (pow.f32 sinTheta_O #s(literal 4 binary32)))) (.f32 eta eta)) (neg.f32 (/.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 sinTheta_O sinTheta_O)))))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (neg.f32 (*.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (-.f32 (.f32 eta eta) (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (neg.f32 (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (-.f32 (pow.f32 (/.f32 eta sinTheta_O) #s(literal 2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O))))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (/.f32 (+.f32 (.f32 (.f32 h (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32)) (.f32 (*.f32 eta eta) h)) (pow.f32 eta #s(literal 3 binary32))))
#s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (/.f32 (+.f32 (.f32 (.f32 h (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32)) (.f32 (.f32 eta eta) h)) (.f32 eta eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (-.f32 h (.f32 #s(literal -1/2 binary32) (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) (*.f32 eta eta)) (cosh.f32 (atanh.f32 sinTheta_O))))) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (+.f32 h (.f32 (.f32 h (/.f32 (-.f32 (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)))) (.f32 #s(literal 1/2 binary32) (.f32 (.f32 sinTheta_O sinTheta_O) (.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)) (cosh.f32 (atanh.f32 sinTheta_O)))))) (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)) (cosh.f32 (atanh.f32 sinTheta_O)))))) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 h (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) (/.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)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32)) (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32)))) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (-.f32 #s(literal 1 binary32) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (-.f32 (.f32 (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) (/.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)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32)) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O 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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O 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 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (+.f32 (+.f32 (.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal -1/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 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O 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 (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.f32 sinTheta_O))))) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (+.f32 h (.f32 (.f32 h (/.f32 (-.f32 (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)))) (.f32 #s(literal 1/2 binary32) (.f32 (.f32 sinTheta_O sinTheta_O) (.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)) (cosh.f32 (atanh.f32 sinTheta_O)))))) (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)) (cosh.f32 (atanh.f32 sinTheta_O)))))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (/.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (.f32 eta eta)))) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (+.f32 (.f32 (/.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (.f32 eta eta)) #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(literal 1 binary32)) eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* 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 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (.f32 eta eta)))) (+.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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.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 h (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) (/.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)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32)) (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32)))) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (-.f32 #s(literal 1 binary32) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (-.f32 (.f32 (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) (/.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)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32)) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) eta))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (+.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) (.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (+.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) #s(literal 1 binary32)) (/.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (.f32 eta eta)))
#s(approx (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (/.f32 (-.f32 (-.f32 (+.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal 1 binary32)) (/.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))))) (.f32 eta eta)))
#s(approx (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O 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 (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O 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 (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (/.f32 (pow.f32 eta #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 eta eta)))
#s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (.f32 (+.f32 (neg.f32 (/.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (.f32 eta eta))) #s(literal 1 binary32)) (.f32 eta eta)))
#s(approx (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (+.f32 (neg.f32 (.f32 (pow.f32 eta #s(literal -2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O)))) (pow.f32 sinTheta_O #s(literal -2 binary32))) (*.f32 eta eta)))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (neg.f32 h) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.f32 sinTheta_O))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (.f32 (.f32 h (/.f32 (-.f32 (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)))) (.f32 #s(literal 1/2 binary32) (.f32 (.f32 sinTheta_O sinTheta_O) (.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)) (cosh.f32 (atanh.f32 sinTheta_O)))))) (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)) (cosh.f32 (atanh.f32 sinTheta_O)))))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (neg.f32 h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 h (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) (/.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)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32)) (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32)))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (-.f32 #s(literal 1 binary32) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (-.f32 (.f32 (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) (/.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)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32)) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (-.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 (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O 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 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (+.f32 (+.f32 (+.f32 (.f32 (/.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))) #s(literal -1/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 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32))))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (neg.f32 h) eta))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.f32 sinTheta_O))))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* 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)) (cosh.f32 (atanh.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta)))
#s(approx (/ h (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (neg.f32 (/.f32 (+.f32 (+.f32 h (.f32 (.f32 h (/.f32 (-.f32 (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)))) (.f32 #s(literal 1/2 binary32) (.f32 (.f32 sinTheta_O sinTheta_O) (.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)) (cosh.f32 (atanh.f32 sinTheta_O)))))) (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)) (cosh.f32 (atanh.f32 sinTheta_O)))))) eta)))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (neg.f32 eta))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (/.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (.f32 eta eta))))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (+.f32 (+.f32 (.f32 (/.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (.f32 eta eta)) #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(literal 1 binary32))))
#s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (+.f32 (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (/.f32 (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O) (.f32 eta eta)))) (+.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 (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (/.f32 (neg.f32 h) eta))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (neg.f32 (/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta)))
#s(approx (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (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 h (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) (/.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)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32)) (.f32 (.f32 (.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32)))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal -1 binary32) eta))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (-.f32 #s(literal 1 binary32) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1/2 binary32)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O))))) eta)))
#s(approx (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (neg.f32 (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (.f32 (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32))) #s(literal -1/2 binary32))) (-.f32 (.f32 (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) (/.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)) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (neg.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 (sin.f32 (acos.f32 sinTheta_O)) #s(literal 3 binary32))))) (pow.f32 eta #s(literal 6 binary32))) #s(literal -1/2 binary32)) (/.f32 (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (*.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))))) eta)))
#s(approx (/ (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) eta) (neg.f32 (/.f32 (-.f32 (neg.f32 h) (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal 1/2 binary32))) eta)))

eval64.0ms (1.3%)

Memory: -3.5MiB live, 92.2MiB allocated; 13ms collecting garbage
Compiler: Compiled 30 290 to 3 965 computations (86.9% saved)

prune27.0ms (0.5%)

Memory

5.7MiB live, 51.9MiB allocated; 3ms collecting garbage

Pruning

17 alts after pruning (9 fresh and 8 done)

	Pruned	Kept	Total
New	517	6	523
Fresh	2	3	5
Picked	2	3	5
Done	0	5	5
Total	521	17	538

Accuracy

99.8%

Counts

538 → 17

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	25.7%	(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
✓	92.2%	(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)))))))
✓	92.1%	(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))))))
	76.7%	(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)) (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)))))))))
✓	98.1%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (-.f32 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.f32 sinTheta_O eta)))))))
✓	95.6%	(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) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta)))
✓	91.7%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta)))
	60.6%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 #s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (/.f32 (+.f32 (.f32 (.f32 h (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32)) (.f32 (.f32 eta eta) h)) (.f32 eta eta))) eta)))
	91.7%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) h)))
	38.7%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) #s(approx (/ 1 (sqrt (- 1 ( sinTheta_O sinTheta_O)))) #s(literal 1 binary32))) (*.f32 sinTheta_O sinTheta_O))))) h)))
✓	33.9%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
	33.8%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (+.f32 (neg.f32 (.f32 (pow.f32 eta #s(literal -2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O)))) (pow.f32 sinTheta_O #s(literal -2 binary32))) (.f32 eta eta))) (.f32 sinTheta_O sinTheta_O))))) h)))
	85.3%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
	88.4%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (+.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta)))))) h)))
✓	95.1%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
	90.5%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal -1 binary32)))) h)))

Compiler

Compiled 2 173 to 763 computations (64.9% saved)

regimes86.0ms (1.8%)

Memory

-33.4MiB live, 108.6MiB allocated; 13ms collecting garbage

Counts

34 → 1

Calls

Call 1

Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))
(asin.f32 (/.f32 h (sqrt.f32 (-.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 (.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 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.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) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) #s(approx (* (- (/ (* eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* sinTheta_O sinTheta_O)) (+.f32 (neg.f32 (.f32 sinTheta_O sinTheta_O)) (.f32 eta eta)))))) h)))
(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 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) #s(approx (/ 1 (sqrt (- 1 ( sinTheta_O sinTheta_O)))) #s(literal 1 binary32))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (/.f32 eta sinTheta_O) (/.f32 eta sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.f32 (/.f32 (.f32 eta eta) (.f32 sinTheta_O sinTheta_O)) (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 #s(approx (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (pow.f32 eta #s(literal -2 binary32)))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (exp.f32 (*.f32 (log.f32 eta) #s(literal -1 binary32)))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (+.f32 (.f32 (.f32 (/.f32 h (.f32 eta eta)) (.f32 sinTheta_O (tan.f32 (asin.f32 sinTheta_O)))) #s(literal 1/2 binary32)) h) eta)))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sin (acos sinTheta_O)) #s(literal 1 binary32)))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 (+.f32 (/.f32 (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)) (.f32 (sin.f32 (acos.f32 sinTheta_O)) (.f32 eta eta))) #s(literal 1 binary32)) eta)) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 (-.f32 h (.f32 (.f32 (*.f32 (/.f32 (/.f32 h eta) eta) sinTheta_O) (tan.f32 (asin.f32 sinTheta_O))) #s(literal -1/2 binary32))) eta)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (/.f32 #s(literal 1 binary32) (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)) (sin.f32 (acos.f32 sinTheta_O)))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (/.f32 #s(approx (+ (* (* (/ h (* eta eta)) (* sinTheta_O (tan (asin sinTheta_O)))) 1/2) h) (/.f32 (+.f32 (.f32 (.f32 h (.f32 (tan.f32 (asin.f32 sinTheta_O)) sinTheta_O)) #s(literal 1/2 binary32)) (.f32 (.f32 eta eta) h)) (.f32 eta eta))) eta)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 (-.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))))) h)))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (+.f32 (pow.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) #s(literal 3 binary32)) (pow.f32 eta #s(literal 3 binary32))) (+.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta)) (-.f32 (.f32 eta eta) (.f32 (/.f32 (.f32 (*.f32 sinTheta_O sinTheta_O) #s(literal -1/2 binary32)) eta) eta)))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (/.f32 (-.f32 (pow.f32 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)))))))))
(asin.f32 #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))))
(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 (exp.f32 (.f32 (log.f32 eta) #s(literal 2 binary32))) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (+.f32 (neg.f32 (.f32 (pow.f32 eta #s(literal -2 binary32)) (cosh.f32 (atanh.f32 sinTheta_O)))) (pow.f32 sinTheta_O #s(literal -2 binary32))) (.f32 eta eta))) (.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (.f32 #s(approx (- (/ ( eta eta) (* sinTheta_O sinTheta_O)) (/ 1 (sin (acos sinTheta_O)))) (.f32 (-.f32 (pow.f32 sinTheta_O #s(literal -2 binary32)) (/.f32 (pow.f32 eta #s(literal -2 binary32)) (sin.f32 (acos.f32 sinTheta_O)))) (.f32 eta eta))) (*.f32 sinTheta_O sinTheta_O))))) h)))

Outputs

(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (-.f32 eta (*.f32 #s(literal 1/2 binary32) (*.f32 sinTheta_O (/.f32 sinTheta_O eta)))))))

Calls

10 calls:

11.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))))))
10.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	h
8.0ms	sinTheta_O

Results

Accuracy	Segments	Branch
98.1%	1	`(*.f32 sinTheta_O sinTheta_O)`
98.1%	1	`(/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))`
98.1%	1	`(*.f32 eta eta)`
98.1%	1	`(-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))`
98.1%	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.1%	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.1%	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.1%	1	`sinTheta_O`
98.1%	1	`h`
98.1%	1	`eta`

Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes21.0ms (0.4%)

Memory

37.2MiB live, 37.2MiB allocated; 0ms collecting garbage

Counts

6 → 1

Calls

Call 1

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

Outputs

(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))))

Calls

10 calls:

2.0ms	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
2.0ms	(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
2.0ms	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))))))
2.0ms	h

Results

Accuracy	Segments	Branch
97.7%	1	`(*.f32 sinTheta_O sinTheta_O)`
97.7%	1	`(/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))`
97.7%	1	`(*.f32 eta eta)`
97.7%	1	`(-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))`
97.7%	1	`(sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))`
97.7%	1	`(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))`
97.7%	1	`(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))`
97.7%	1	`sinTheta_O`
97.7%	1	`h`
97.7%	1	`eta`

Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes20.0ms (0.4%)

Memory

-13.5MiB live, 33.2MiB allocated; 1ms collecting garbage

Counts

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

Results

Accuracy	Segments	Branch
95.6%	1	`(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))`
95.6%	1	`(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))`
95.6%	1	`h`
98.9%	2	`(*.f32 sinTheta_O sinTheta_O)`
98.9%	2	`(/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))`
98.7%	2	`(*.f32 eta eta)`
98.7%	2	`(-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))`
98.7%	2	`(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.9%	2	`sinTheta_O`
98.7%	2	`eta`

Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes16.0ms (0.3%)

Memory

-18.2MiB live, 28.5MiB allocated; 2ms collecting garbage

Accuracy

Total -23.8b remaining (-1691.9%)

Threshold costs -23.8b (-1691.9%)

Counts

4 → 1

Calls

Call 1

Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 #s(approx (sqrt (/ 1 (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/.f32 #s(literal 1 binary32) eta)) h)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (exp (* (log eta) 2)) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) #s(approx (- ( eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (*.f32 eta eta)))) h)))

Outputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))

Calls

9 calls:

2.0ms	(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))
2.0ms	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
2.0ms	(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	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)))))

Results

Accuracy	Segments	Branch
95.6%	1	`(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))))`
95.6%	1	`(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))`
95.6%	1	`(*.f32 eta eta)`
95.6%	1	`(-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))`
95.6%	1	`(sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))`
95.6%	1	`eta`
95.6%	1	`(*.f32 sinTheta_O sinTheta_O)`
95.6%	1	`(/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))`
95.6%	1	`sinTheta_O`

Compiler

Compiled 82 to 68 computations (17.1% saved)

bsearch0.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
0.0ms	6.0440617458947816e-24	7.940523988382713e-24

Compiler

Compiled 21 to 19 computations (9.5% saved)

simplify54.0ms (1.1%)

Memory

-5.4MiB live, 40.8MiB allocated; 8ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	39	122
1	60	122
2	116	122
3	209	122
4	319	122
5	548	122
6	3005	122
7	7120	122

Stop Event

1×	node limit

Calls

Call 1

Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (-.f32 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.f32 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 (.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(if (<=.f32 sinTheta_O #s(literal 4436777/633825300114114700748351602688 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 eta (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O (/.f32 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 (.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(if (<=.f32 sinTheta_O #s(literal 4436777/633825300114114700748351602688 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)))

derivations28.0ms (0.6%)

Memory

26.3MiB live, 26.3MiB allocated; 0ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 122 to 39 computations (68% saved)

preprocess23.0ms (0.5%)

Memory: -4.8MiB live, 40.8MiB allocated; 4ms collecting garbage
Remove: (abs eta)
Compiler: Compiled 556 to 248 computations (55.4% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze247.0ms (5.1%)

sample2.5s (51%)

explain265.0ms (5.4%)

preprocess207.0ms (4.2%)

eval0.0ms (0%)

prune0.0ms (0%)

series32.0ms (0.7%)

rewrite129.0ms (2.6%)

eval19.0ms (0.4%)

prune8.0ms (0.2%)

series118.0ms (2.4%)

rewrite217.0ms (4.4%)

eval48.0ms (1%)

prune20.0ms (0.4%)

series74.0ms (1.5%)

rewrite213.0ms (4.4%)

eval53.0ms (1.1%)

prune19.0ms (0.4%)

series109.0ms (2.2%)

rewrite272.0ms (5.6%)

eval64.0ms (1.3%)

prune27.0ms (0.5%)

regimes86.0ms (1.8%)

regimes21.0ms (0.4%)

regimes20.0ms (0.4%)

regimes16.0ms (0.3%)

bsearch0.0ms (0%)

simplify54.0ms (1.1%)

derivations28.0ms (0.6%)

preprocess23.0ms (0.5%)

end0.0ms (0%)

Profiling