Metrics for HairBSDF, gamma for a refracted ray

start0.0ms (0%)

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

analyze437.0ms (4.6%)

Memory

45.2MiB live, 327.2MiB allocated; 196ms 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.3s (23.6%)

Memory

27.1MiB live, 2 550.7MiB allocated; 559ms collecting garbage

Samples

816.0ms	8 261×	0	invalid
766.0ms	8 256×	0	valid

Precisions

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

ival-mult: 306.0ms (28.8% of total)

ival-sqrt: 211.0ms (19.8% of total)

ival-div: 199.0ms (18.7% of total)

ival-sub: 181.0ms (17% of total)

ival-asin: 143.0ms (13.4% of total)

exact: 15.0ms (1.4% of total)

adjust: 6.0ms (0.6% of total)

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

Bogosity

explain154.0ms (1.6%)

Memory

11.7MiB live, 205.7MiB allocated; 10ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
26	-	10	(1.6363387041615272e-37 -2.0079342210927737e-34 1.5930869528531054e-21)	`(sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))`
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	300
↳	`(-.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	150
↳	`(*.f32 eta eta)`	underflow	16

Confusion

	Predicted +	Predicted -
+	16	9
-	0	231

Precision

1.0

Recall

0.64

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	16	0	9
-	0	0	231

Precision?

1.0

Recall?

0.64

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

50.0ms

512×

valid

Compiler

Compiled 212 to 43 computations (79.7% saved)

Precisions

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

ival-div: 7.0ms (23.1% of total)

ival-mult: 7.0ms (23.1% of total)

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

ival-sub: 5.0ms (16.5% of total)

ival-asin: 4.0ms (13.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)

preprocess250.0ms (2.6%)

Memory

21.6MiB live, 162.4MiB allocated; 13ms 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	15

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

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

Compiler

Compiled 18 to 13 computations (27.8% saved)

series33.0ms (0.3%)

Memory

-14.8MiB live, 31.4MiB 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)
5.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)
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	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)

rewrite192.0ms (2%)

Memory

8.7MiB live, 105.4MiB allocated; 76ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

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

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 h (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32)))) #s(literal 1/2 binary32)) (/.f32 h eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.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)) (pown3/2s.f32 (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) (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 (.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 #s(literal -1/2 binary32) (.f32 (pown3/2s.f32 (.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 eta eta)))) (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 (.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 #s(literal -1/2 binary32) (.f32 (pown3/2s.f32 (.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)) (*.f32 eta eta))))) 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)) (pown3/2s.f32 (.f32 (sqrt.f32 #s(literal -1 binary32)) 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 (.f32 #s(literal -1/2 binary32) (.f32 (.f32 eta eta) h)) (pown3/2s.f32 (.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) (.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)) (pown3/2s.f32 (.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))) (*.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 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.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 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.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 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.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 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.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 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)) #s(literal 1/4 binary32))))) (.f32 eta eta)) (.f32 (.f32 #s(literal 1/2 binary32) (pow.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.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 (pow.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.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 (pow.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)) #s(literal 1/4 binary32)) (*.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (+.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 (ratio-of-squares.f32 eta (pow.f32 sinTheta_O #s(literal 3/2 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 3/2 binary32))))) (.f32 eta eta)) (.f32 (pow.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)) #s(literal 1/4 binary32)) (.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (+.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 (ratio-of-squares.f32 eta (pow.f32 sinTheta_O #s(literal 5/2 binary32))) (pow.f32 #s(literal -1 binary32) #s(literal 5/2 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 (pow.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)) #s(literal 1/4 binary32)) (.f32 (sqrt.f32 #s(literal -1 binary32)) sinTheta_O))))
#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 h (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (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 h (ratio-of-squares.f32 sinTheta_O 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 (pown3/2s.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32))) (-.f32 (.f32 (.f32 h (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32)) (.f32 #s(literal -1/2 binary32) (.f32 (*.f32 h (ratio-of-squares.f32 sinTheta_O 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 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) (/.f32 (.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (+.f32 (+.f32 (.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pown3/2s.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) #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) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32)) eta))
#s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (.f32 (+.f32 (neg.f32 (.f32 (ratio-of-squares.f32 sinTheta_O 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 h (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta)))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (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 h (ratio-of-squares.f32 sinTheta_O 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 (pown3/2s.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) (pow.f32 sinTheta_O #s(literal 6 binary32))))) (pow.f32 eta #s(literal 6 binary32)))) #s(literal -1/2 binary32))) (-.f32 (.f32 (.f32 h (/.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O))) #s(literal -3/4 binary32)) (pow.f32 eta #s(literal 4 binary32)))) #s(literal -1/2 binary32)) (.f32 #s(literal -1/2 binary32) (.f32 (*.f32 h (ratio-of-squares.f32 sinTheta_O 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 (.f32 (*.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (+.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) (/.f32 (.f32 #s(literal -1/8 binary32) (pow.f32 sinTheta_O #s(literal 4 binary32))) (.f32 (pow.f32 eta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))))))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (neg.f32 eta) (+.f32 (+.f32 (+.f32 (.f32 (.f32 (/.f32 (pow.f32 sinTheta_O #s(literal 6 binary32)) (pow.f32 eta #s(literal 6 binary32))) (pown3/2s.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) #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) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))) #s(literal 1 binary32))))

eval132.0ms (1.4%)

Memory

-12.3MiB live, 222.4MiB allocated; 24ms collecting garbage

Samples

59.0ms	1 268×	0	valid
29.0ms	524×	0	invalid

Compiler

Compiled 5 383 to 1 100 computations (79.6% saved)

Precisions

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

ival-mult: 14.0ms (33.6% of total)

ival-pow: 11.0ms (26.4% of total)

ival-div: 9.0ms (21.6% of total)

ival-sqrt: 3.0ms (7.2% of total)

ival-add: 1.0ms (2.4% of total)

adjust: 1.0ms (2.4% of total)

ival-assert: 1.0ms (2.4% of total)

ival-true: 1.0ms (2.4% of total)

exact: 0.0ms (0% of total)

prune94.0ms (1%)

Memory

21.5MiB live, 162.3MiB allocated; 15ms collecting garbage

Pruning

12 alts after pruning (11 fresh and 1 done)

	Pruned	Kept	Total
New	138	11	149
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	138	12	150

Accuracy

99.5%

Counts

150 → 12

Alt Table

Click to see full alt table

Status	Accuracy	Program
	20.4%	(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
✓	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))))))))
▶	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (-.f32 #s(literal 1 binary32) (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))))
▶	91.7%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
	88.5%	(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
	97.3%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
▶	98.2%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (*.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) eta))))
▶	95.0%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
	97.9%	(asin.f32 #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 h (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))))) eta)))
▶	97.2%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32)))) #s(literal 1/2 binary32)) (/.f32 h eta))))
	87.3%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))

Samples

62.0ms	1 532×	0	valid
0.0ms	4×	0	invalid

Compiler

Compiled 630 to 441 computations (30% saved)

Precisions

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

ival-mult: 19.0ms (61.5% of total)

ival-div: 10.0ms (32.4% of total)

ival-true: 1.0ms (3.2% of total)

ival-assert: 1.0ms (3.2% of total)

adjust: 0.0ms (0% of total)

series74.0ms (0.8%)

Memory

-10.7MiB live, 129.6MiB allocated; 18ms collecting garbage

Counts

44 → 125

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 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (*.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (*.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) eta))
(.f32 (+.f32 (.f32 (*.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) eta)
(+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32))
(.f32 (.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(*.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta))
#s(literal -1/2 binary32)
(ratio-of-squares.f32 sinTheta_O eta)
sinTheta_O
eta
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
#s(literal 1 binary32)
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))
(sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))
(-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))
(*.f32 eta eta)
#s(approx (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (-.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))))
#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)))
(.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 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32)))) #s(literal 1/2 binary32)) (/.f32 h eta))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32)))) #s(literal 1/2 binary32)) (/.f32 h eta)))
(+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32)))) #s(literal 1/2 binary32)) (/.f32 h eta))
(.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32)))) #s(literal 1/2 binary32))
(*.f32 h (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32))))
(ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32)))
(pow.f32 eta #s(literal 3/2 binary32))
#s(literal 3/2 binary32)
#s(literal 1/2 binary32)
(/.f32 h eta)

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

Calls

9 calls:

Time	Variable		Point	Expression
15.0ms	eta	@	inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (+ (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) 1) eta) (+ (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) 1) (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* -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))))))) (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) (pow eta 3/2) 3/2 1/2 (/ h eta))
14.0ms	sinTheta_O	@	0	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (+ (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) 1) eta) (+ (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) 1) (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* -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))))))) (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) (pow eta 3/2) 3/2 1/2 (/ h eta))
8.0ms	sinTheta_O	@	inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (+ (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) 1) eta) (+ (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) 1) (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* -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))))))) (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) (pow eta 3/2) 3/2 1/2 (/ h eta))
7.0ms	sinTheta_O	@	-inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (+ (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) 1) eta) (+ (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) 1) (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* -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))))))) (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) (pow eta 3/2) 3/2 1/2 (/ h eta))
7.0ms	eta	@	-inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (+ (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) 1) eta) (+ (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) 1) (* (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) (/ 1 (sin (acos sinTheta_O)))) (* -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta))) -1/2 (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* 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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (* (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* sinTheta_O sinTheta_O)) (- 1 (* -1/2 (* sinTheta_O sinTheta_O))) (* -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))))))) (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) (pow eta 3/2) 3/2 1/2 (/ h eta))

rewrite143.0ms (1.5%)

Memory

21.8MiB live, 160.3MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	733	5647
0	780	4722
0	3960	4678

Stop Event

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

Counts

169 → 279

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

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

eval632.0ms (6.6%)

Memory

43.3MiB live, 1 063.6MiB allocated; 158ms collecting garbage

Samples

416.0ms	9 336×	0	valid
34.0ms	648×	0	invalid

Compiler

Compiled 13 197 to 2 006 computations (84.8% saved)

Precisions

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

ival-mult: 138.0ms (59.5% of total)

ival-div: 64.0ms (27.6% of total)

ival-pow: 11.0ms (4.7% of total)

ival-true: 7.0ms (3% of total)

ival-assert: 4.0ms (1.7% of total)

adjust: 3.0ms (1.3% of total)

ival-sqrt: 3.0ms (1.3% of total)

ival-add: 2.0ms (0.9% of total)

exact: 1.0ms (0.4% of total)

prune162.0ms (1.7%)

Memory

-18.1MiB live, 361.4MiB allocated; 30ms collecting garbage

Pruning

15 alts after pruning (11 fresh and 4 done)

	Pruned	Kept	Total
New	333	7	340
Fresh	2	4	6
Picked	2	3	5
Done	0	1	1
Total	337	15	352

Accuracy

99.6%

Counts

352 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	22.9%	(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
✓	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
▶	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))))))))
✓	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (-.f32 #s(literal 1 binary32) (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))))
✓	91.7%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
	88.5%	(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
▶	97.3%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
▶	98.2%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
	98.2%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal 1 binary32)) eta))))
	92.0%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) eta))))
✓	95.0%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
	87.3%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
	60.0%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) #s(literal 1/2 binary32)) (.f32 (*.f32 eta eta) h)) (pow.f32 eta #s(literal 3 binary32))))))
	97.8%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O eta)) #s(literal 1/2 binary32)) h) eta))))
▶	96.6%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32))) #s(literal 1/2 binary32)) (/.f32 #s(literal 1 binary32) eta)) h))))

Samples

109.0ms	2 556×	0	valid
0.0ms	4×	0	invalid

Compiler

Compiled 948 to 604 computations (36.3% saved)

Precisions

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

ival-mult: 30.0ms (52.6% of total)

ival-div: 21.0ms (36.8% of total)

ival-add: 2.0ms (3.5% of total)

ival-true: 2.0ms (3.5% of total)

adjust: 1.0ms (1.8% of total)

ival-assert: 1.0ms (1.8% of total)

series142.0ms (1.5%)

Memory

-24.0MiB live, 198.2MiB allocated; 117ms collecting garbage

Counts

53 → 168

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 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))
(.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta)
(/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32)))
(-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32))
(.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)))
(.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))
(*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(ratio-of-squares.f32 sinTheta_O eta)
sinTheta_O
eta
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
#s(literal 1 binary32)
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(literal -1/2 binary32)
(-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(/.f32 (PI.f32) #s(literal 2 binary32))
(PI.f32)
#s(literal 2 binary32)
(acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)
(asin.f32 (/.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)))
#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)
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))))))))
(/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O))))))))
(sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))))))
(-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O))))))
(*.f32 eta eta)
(/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 ( sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))))
#s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O))))
(-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))
(.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O))
#s(literal 1/2 binary32)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32))) #s(literal 1/2 binary32)) (/.f32 #s(literal 1 binary32) eta)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32))) #s(literal 1/2 binary32)) (/.f32 #s(literal 1 binary32) eta)) h)))
#s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32))) #s(literal 1/2 binary32)) (/.f32 #s(literal 1 binary32) eta)) h))
(.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32))) #s(literal 1/2 binary32)) (/.f32 #s(literal 1 binary32) eta)) h)
(+.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32))) #s(literal 1/2 binary32)) (/.f32 #s(literal 1 binary32) eta))
(*.f32 (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32))) #s(literal 1/2 binary32))
(ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32)))
(pow.f32 eta #s(literal 3/2 binary32))
#s(literal 3/2 binary32)
(/.f32 #s(literal 1 binary32) eta)

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

Calls

9 calls:

Time	Variable		Point	Expression
61.0ms	h	@	-inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1)) eta) (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1)) (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) -1/2 (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1) (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* 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) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) (* 1/2 (* sinTheta_O sinTheta_O)) 1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) h) (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) (pow eta 3/2) 3/2 (/ 1 eta))
12.0ms	sinTheta_O	@	-inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1)) eta) (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1)) (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) -1/2 (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1) (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* 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) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) (* 1/2 (* sinTheta_O sinTheta_O)) 1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) h) (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) (pow eta 3/2) 3/2 (/ 1 eta))
12.0ms	sinTheta_O	@	inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1)) eta) (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1)) (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) -1/2 (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1) (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* 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) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) (* 1/2 (* sinTheta_O sinTheta_O)) 1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) h) (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) (pow eta 3/2) 3/2 (/ 1 eta))
12.0ms	eta	@	inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1)) eta) (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1)) (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) -1/2 (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1) (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* 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) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) (* 1/2 (* sinTheta_O sinTheta_O)) 1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) h) (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) (pow eta 3/2) 3/2 (/ 1 eta))
11.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 eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1)) eta) (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1)) (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) -1/2 (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) 1) (- (/ (PI) 2) (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))))) (/ (PI) 2) (PI) 2 (acos (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* 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) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (sqrt (- 1 (* sinTheta_O sinTheta_O))) (- 1 (* 1/2 (* sinTheta_O sinTheta_O))) (* 1/2 (* sinTheta_O sinTheta_O)) 1/2 (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) h) (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) (pow eta 3/2) 3/2 (/ 1 eta))

rewrite186.0ms (1.9%)

Memory

-0.8MiB live, 229.6MiB allocated; 35ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	870	7454
0	927	6144
0	4685	6098

Stop Event

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

Counts

221 → 347

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

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

eval1.6s (17.1%)

Memory

-125.5MiB live, 1 214.5MiB allocated; 1.8s collecting garbage

Samples

860.0ms	648×	0	invalid
537.0ms	9 592×	0	valid

Compiler

Compiled 26 813 to 3 125 computations (88.3% saved)

Precisions

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

ival-pow: 840.0ms (71.3% of total)

ival-mult: 251.0ms (21.3% of total)

ival-div: 68.0ms (5.8% of total)

ival-true: 7.0ms (0.6% of total)

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

adjust: 3.0ms (0.3% of total)

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

ival-add: 1.0ms (0.1% of total)

exact: 1.0ms (0.1% of total)

prune177.0ms (1.8%)

Memory

-5.9MiB live, 331.1MiB allocated; 51ms collecting garbage

Pruning

18 alts after pruning (11 fresh and 7 done)

	Pruned	Kept	Total
New	507	6	513
Fresh	1	5	6
Picked	2	3	5
Done	0	4	4
Total	510	18	528

Accuracy

99.6%

Counts

528 → 18

Alt Table

Click to see full alt table

Status	Accuracy	Program
	22.7%	(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))) (.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- ( eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))))
✓	22.9%	(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
✓	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
✓	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))))))))
✓	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (-.f32 #s(literal 1 binary32) (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))))
✓	91.7%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
	88.5%	(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
✓	97.3%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
▶	98.2%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
	92.3%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
▶	98.2%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
	92.0%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) eta))))
▶	98.1%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
✓	95.0%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
▶	87.3%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))))) h)))
	60.0%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) #s(literal 1/2 binary32)) (.f32 (*.f32 eta eta) h)) (pow.f32 eta #s(literal 3 binary32))))))
	97.8%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O eta)) #s(literal 1/2 binary32)) h) eta))))
▶	94.3%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h))))

Samples

108.0ms

2 560×

valid

Compiler

Compiled 1 288 to 714 computations (44.6% saved)

Precisions

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

ival-mult: 35.0ms (58.2% of total)

ival-div: 20.0ms (33.3% of total)

ival-add: 2.0ms (3.3% of total)

ival-true: 2.0ms (3.3% of total)

adjust: 1.0ms (1.7% of total)

ival-assert: 1.0ms (1.7% of total)

series148.0ms (1.5%)

Memory

18.0MiB live, 247.7MiB allocated; 22ms collecting garbage

Counts

54 → 290

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 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta)))
h
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))
(.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta)
(/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32)))
(-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32))
(.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)))
(.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))
(*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))))
(ratio-of-squares.f32 sinTheta_O eta)
sinTheta_O
eta
(/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))
#s(literal 1 binary32)
(sin.f32 (acos.f32 sinTheta_O))
(acos.f32 sinTheta_O)
#s(literal -1/2 binary32)
(-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))
(.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32))
(.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O))))
(sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))
(ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O))
(*.f32 (neg.f32 sinTheta_O) sinTheta_O)
(neg.f32 sinTheta_O)
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h))))
#s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h)))
#s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h))
(.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h)
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta))
(/.f32 #s(literal 1 binary32) eta)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta)))
#s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))
(+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta)
(.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32))
(*.f32 sinTheta_O (/.f32 sinTheta_O eta))
(/.f32 sinTheta_O eta)
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
(/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #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)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))
#s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta))
(.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)
(+.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32))
(*.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (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 eta eta)
(.f32 (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O))) (.f32 sinTheta_O sinTheta_O))
(*.f32 sinTheta_O sinTheta_O)

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

Calls

9 calls:

Time	Variable		Point	Expression
23.0ms	h	@	0	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1)) eta) (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1)) (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) -1/2 (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O)))) (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))) (* (neg sinTheta_O) sinTheta_O) (neg 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 (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) h) (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/ 1 eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) (* sinTheta_O (/ sinTheta_O eta)) (/ 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 (- (* 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 eta)) -1/2) 1) eta) (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1/2) 1) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1/2) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O))
20.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 eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1)) eta) (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1)) (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) -1/2 (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O)))) (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))) (* (neg sinTheta_O) sinTheta_O) (neg 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 (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) h) (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/ 1 eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) (* sinTheta_O (/ sinTheta_O eta)) (/ 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 (- (* 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 eta)) -1/2) 1) eta) (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1/2) 1) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1/2) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O))
18.0ms	sinTheta_O	@	inf	((asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (* (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1)) eta) (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1)) (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) -1/2 (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O)))) (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))) (* (neg sinTheta_O) sinTheta_O) (neg 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 (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) h) (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/ 1 eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) (* sinTheta_O (/ sinTheta_O eta)) (/ 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 (- (* 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 eta)) -1/2) 1) eta) (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1/2) 1) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1/2) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O))
15.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 eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1)) eta) (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1)) (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) -1/2 (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O)))) (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))) (* (neg sinTheta_O) sinTheta_O) (neg 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 (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) h) (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/ 1 eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) (* sinTheta_O (/ sinTheta_O eta)) (/ 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 (- (* 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 eta)) -1/2) 1) eta) (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1/2) 1) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1/2) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (* 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 eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1)) eta) (/ (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1)) (- (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) 1) (* (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2)) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (/ 1 (sin (acos sinTheta_O)))) (/ (* sinTheta_O sinTheta_O) (* eta eta)) sinTheta_O eta (/ 1 (sin (acos sinTheta_O))) 1 (sin (acos sinTheta_O)) (acos sinTheta_O) -1/2 (- (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) 1) (* (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) -1/2) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))))) (sqrt (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O)))) (/ (* 1 1) (+ 1 (* (neg sinTheta_O) sinTheta_O))) (* (neg sinTheta_O) sinTheta_O) (neg 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 (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (* (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) h) (+ (* (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/ 1 eta) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+ (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) eta) (* (* sinTheta_O (/ sinTheta_O eta)) -1/2) (* sinTheta_O (/ sinTheta_O eta)) (/ 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 (- (* 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 eta)) -1/2) 1) eta) (+ (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1/2) 1) (* (/ (* sinTheta_O sinTheta_O) (* eta eta)) -1/2) (asin (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))))) (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (* (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) h) (sqrt (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))))) (/ 1 (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)))) (- (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O))) (* eta eta) (* (/ 1 (sin (acos sinTheta_O))) (* sinTheta_O sinTheta_O)) (* sinTheta_O sinTheta_O))

rewrite254.0ms (2.7%)

Memory

-15.9MiB live, 362.9MiB allocated; 59ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1599	16760
0	1666	13845
0	8484	13547

Stop Event

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

Counts

344 → 445

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

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

eval768.0ms (8%)

Memory

36.7MiB live, 1 416.7MiB allocated; 216ms collecting garbage

Samples

479.0ms	9 839×	0	valid
39.0ms	913×	0	invalid

Compiler

Compiled 38 799 to 4 288 computations (88.9% saved)

Precisions

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

ival-mult: 172.0ms (59.6% of total)

ival-div: 80.0ms (27.7% of total)

ival-pow: 11.0ms (3.8% of total)

ival-add: 7.0ms (2.4% of total)

ival-true: 7.0ms (2.4% of total)

ival-assert: 5.0ms (1.7% of total)

adjust: 3.0ms (1% of total)

ival-sqrt: 3.0ms (1% of total)

exact: 1.0ms (0.3% of total)

prune171.0ms (1.8%)

Memory

-15.7MiB live, 307.3MiB allocated; 45ms collecting garbage

Pruning

18 alts after pruning (8 fresh and 10 done)

	Pruned	Kept	Total
New	588	4	592
Fresh	2	4	6
Picked	2	3	5
Done	0	7	7
Total	592	18	610

Accuracy

99.6%

Counts

610 → 18

Alt Table

Click to see full alt table

Status	Accuracy	Program
	22.7%	(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))) (.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- ( eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))))
✓	22.9%	(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
✓	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
✓	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))))))))
✓	92.0%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (-.f32 #s(literal 1 binary32) (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))))
✓	91.7%	(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
	88.5%	(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
✓	97.3%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
✓	98.2%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
	92.3%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
	98.2%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (/.f32 (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta)))))
✓	98.1%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
	91.9%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 eta eta)) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
✓	95.0%	(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
	87.3%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (.f32 (sqrt.f32 (/.f32 #s(literal 1 binary32) (-.f32 (.f32 eta eta) (.f32 (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
	60.0%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) #s(literal 1/2 binary32)) (.f32 (*.f32 eta eta) h)) (pow.f32 eta #s(literal 3 binary32))))))
	97.8%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O eta)) #s(literal 1/2 binary32)) h) eta))))
✓	94.3%	(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h))))

Samples

100.0ms	2 302×	0	valid
0.0ms	2×	0	invalid

Compiler

Compiled 1 922 to 664 computations (65.5% saved)

Precisions

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

ival-mult: 26.0ms (47.9% of total)

ival-div: 21.0ms (38.7% of total)

ival-add: 4.0ms (7.4% of total)

ival-true: 1.0ms (1.8% of total)

adjust: 1.0ms (1.8% of total)

ival-assert: 1.0ms (1.8% of total)

regimes86.0ms (0.9%)

Memory

5.6MiB live, 197.1MiB allocated; 17ms collecting garbage

Counts

29 → 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))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O eta)) #s(literal 1/2 binary32)) h) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 eta eta)) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (-.f32 #s(literal 1 binary32) (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal 1 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 (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (/.f32 (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta)))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32))) #s(literal 1/2 binary32)) (/.f32 #s(literal 1 binary32) eta)) h))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32)))) #s(literal 1/2 binary32)) (/.f32 h eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) #s(literal 1/2 binary32)) (.f32 (*.f32 eta eta) h)) (pow.f32 eta #s(literal 3 binary32))))))
(asin.f32 #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 h (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.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 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 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)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
(/.f32 (-.f32 (pow.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) #s(literal 3 binary32)) (pow.f32 (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) #s(literal 3 binary32))) (+.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 (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))) (.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- ( eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (/.f32 (.f32 (.f32 sinTheta_O sinTheta_O) #s(literal 1 binary32)) (.f32 (.f32 eta eta) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 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 (*.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (*.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (*.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))

Calls

10 calls:

13.0ms	sinTheta_O
10.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)))))))
10.0ms	(-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O)))))
8.0ms	(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	eta

Results

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

Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes69.0ms (0.7%)

Memory

20.8MiB live, 165.4MiB allocated; 9ms collecting garbage

Counts

24 → 1

Calls

Call 1

Inputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O eta)) #s(literal 1/2 binary32)) h) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 eta eta)) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (-.f32 #s(literal 1 binary32) (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal 1 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 (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O))) (*.f32 sinTheta_O sinTheta_O))))) h)))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (/.f32 (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (*.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta)))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32))) #s(literal 1/2 binary32)) (/.f32 #s(literal 1 binary32) eta)) h))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) (+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O (pow.f32 eta #s(literal 3/2 binary32)))) #s(literal 1/2 binary32)) (/.f32 h eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 (.f32 sinTheta_O sinTheta_O) h) #s(literal 1/2 binary32)) (.f32 (*.f32 eta eta) h)) (pow.f32 eta #s(literal 3 binary32))))))
(asin.f32 #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 h (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.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 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 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)))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sin.f32 (acos.f32 sinTheta_O))))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (/.f32 (.f32 sinTheta_O sinTheta_O) (*.f32 eta eta))) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal 1 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 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal 1 binary32)) eta))))

Calls

10 calls:

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

Results

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

Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes51.0ms (0.5%)

Memory

-17.5MiB live, 86.0MiB allocated; 18ms collecting garbage

Counts

13 → 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))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) eta) #s(literal -1/2 binary32)) eta))))
(asin.f32 #s(approx (/ h (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (/.f32 (+.f32 (.f32 (.f32 h (ratio-of-squares.f32 sinTheta_O eta)) #s(literal 1/2 binary32)) h) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) #s(approx (+ (* (/ (* sinTheta_O sinTheta_O) eta) -1/2) eta) (.f32 (+.f32 (.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (.f32 eta eta)) #s(literal -1/2 binary32)) #s(literal 1 binary32)) eta)))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (.f32 (-.f32 #s(literal 1 binary32) (.f32 #s(literal -1/2 binary32) (.f32 sinTheta_O sinTheta_O))) (.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) #s(approx (sqrt (- 1 (* sinTheta_O sinTheta_O))) (-.f32 #s(literal 1 binary32) (.f32 #s(literal 1/2 binary32) (.f32 sinTheta_O sinTheta_O)))))))))
(asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 sinTheta_O sinTheta_O))))))))

Outputs

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

Calls

10 calls:

6.0ms	h
4.0ms	(*.f32 eta eta)
4.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))))))))
4.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)))))))
4.0ms	sinTheta_O

Results

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

Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes21.0ms (0.2%)

Memory

-4.4MiB live, 42.1MiB allocated; 2ms 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))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))
(asin.f32 (/.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:

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

Results

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

Compiler

Compiled 83 to 71 computations (14.5% saved)

regimes12.0ms (0.1%)

Memory

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

Accuracy

Total -24.0b remaining (-1499.9%)

Threshold costs -24b (-1499.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))))))) #s(approx (+ (* (* h (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2)))) 1/2) (/ h eta)) (.f32 #s(approx (+ ( (/ (* sinTheta_O sinTheta_O) (* (pow eta 3/2) (pow eta 3/2))) 1/2) (/ 1 eta)) (/.f32 #s(literal 1 binary32) eta)) h))))
(-.f32 (/.f32 (PI.f32) #s(literal 2 binary32)) (acos.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))))
(asin.f32 (/.f32 h (sqrt.f32 #s(approx (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O))))) (*.f32 eta eta)))))

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 47 to 43 computations (8.5% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.401298464324817e-45

Compiler

Compiled 21 to 19 computations (9.5% saved)

simplify60.0ms (0.6%)

Memory

-20.7MiB live, 72.9MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	62	201
1	86	201
2	141	201
3	233	201
4	349	201
5	652	201
6	3629	201
7	7822	201

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 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal 1 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
(if (<=.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) #s(literal 0 binary32)) (asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))

Outputs
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (/.f32 (-.f32 (.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32)) (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (/.f32 #s(literal 1 binary32) (sin.f32 (acos.f32 sinTheta_O)))) #s(literal -1/2 binary32))) #s(literal 1 binary32)) (-.f32 (.f32 (.f32 (ratio-of-squares.f32 sinTheta_O eta) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (*.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal -1/2 binary32)) #s(literal 1 binary32))) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (.f32 (+.f32 (.f32 (.f32 #s(literal -1/2 binary32) (ratio-of-squares.f32 sinTheta_O eta)) (sqrt.f32 (ratio-square-sum.f32 #s(literal 1 binary32) (.f32 (neg.f32 sinTheta_O) sinTheta_O)))) #s(literal 1 binary32)) eta))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) (+.f32 (.f32 (.f32 sinTheta_O (/.f32 sinTheta_O eta)) #s(literal -1/2 binary32)) eta))))
(if (<=.f32 (/.f32 (.f32 sinTheta_O sinTheta_O) (sqrt.f32 (-.f32 #s(literal 1 binary32) (.f32 sinTheta_O sinTheta_O)))) #s(literal 0 binary32)) (asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta))) (asin.f32 (/.f32 h (sqrt.f32 (-.f32 (.f32 eta eta) #s(approx (/ ( sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))) (*.f32 sinTheta_O sinTheta_O)))))))
(asin.f32 (/.f32 h #s(approx (sqrt (- (* eta eta) (/ (* sinTheta_O sinTheta_O) (sqrt (- 1 (* sinTheta_O sinTheta_O)))))) eta)))

derivations97.0ms (1%)

Memory

15.5MiB live, 113.5MiB allocated; 5ms collecting garbage

Stop Event

1×

fuel

Samples

19.0ms

512×

valid

Compiler

Compiled 201 to 63 computations (68.7% saved)

Precisions

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

ival-mult: 5.0ms (51.9% of total)

ival-div: 3.0ms (31.1% of total)

ival-add: 1.0ms (10.4% of total)

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

adjust: 0.0ms (0% of total)

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

preprocess1.1s (11.9%)

Memory

38.4MiB live, 1 768.9MiB allocated; 238ms collecting garbage

Remove

(abs eta)

(abs sinTheta_O)

Samples

825.0ms

18 560×

valid

Compiler

Compiled 686 to 284 computations (58.6% saved)

Precisions

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

ival-mult: 187.0ms (46% of total)

ival-div: 149.0ms (36.7% of total)

ival-add: 46.0ms (11.3% of total)

ival-true: 12.0ms (3% of total)

ival-assert: 8.0ms (2% of total)

adjust: 5.0ms (1.2% of total)

end0.0ms (0%)

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

start0.0ms (0%)

analyze437.0ms (4.6%)

sample2.3s (23.6%)

explain154.0ms (1.6%)

preprocess250.0ms (2.6%)

eval0.0ms (0%)

prune0.0ms (0%)

series33.0ms (0.3%)

rewrite192.0ms (2%)

eval132.0ms (1.4%)

prune94.0ms (1%)

series74.0ms (0.8%)

rewrite143.0ms (1.5%)

eval632.0ms (6.6%)

prune162.0ms (1.7%)

series142.0ms (1.5%)

rewrite186.0ms (1.9%)

eval1.6s (17.1%)

prune177.0ms (1.8%)

series148.0ms (1.5%)

rewrite254.0ms (2.7%)

eval768.0ms (8%)

prune171.0ms (1.8%)

regimes86.0ms (0.9%)

regimes69.0ms (0.7%)

regimes51.0ms (0.5%)

regimes21.0ms (0.2%)

regimes12.0ms (0.1%)

bsearch0.0ms (0%)

simplify60.0ms (0.6%)

derivations97.0ms (1%)

preprocess1.1s (11.9%)

end0.0ms (0%)

Profiling