Metrics for Toniolo and Linder, Equation (2)

start0.0ms (0%)

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

analyze480.0ms (3%)

Memory

-4.8MiB live, 633.3MiB allocated; 143ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.8%	0.2%	0%	0%	0%	0
0%	0%	99.8%	0.2%	0%	0%	0%	1
0%	0%	99.8%	0.2%	0%	0%	0%	2
0%	0%	99.8%	0.2%	0%	0%	0%	3
0%	0%	99.8%	0.2%	0%	0%	0%	4
0%	0%	99.8%	0.2%	0%	0%	0%	5
0%	0%	99.8%	0.2%	0%	0%	0%	6
0%	0%	99.8%	0.2%	0%	0%	0%	7
0%	0%	99.8%	0.2%	0%	0%	0%	8
19.2%	18.7%	78.8%	0.2%	0%	2.3%	0%	9
19.4%	18.7%	77.6%	0.2%	0%	3.5%	0%	10
22.8%	21.8%	73.9%	0.2%	0%	4.1%	0%	11
23.3%	21.8%	71.8%	0.2%	0%	6.1%	0%	12

Compiler

Compiled 21 to 18 computations (14.3% saved)

sample3.9s (24.3%)

Memory

16.4MiB live, 4 449.8MiB allocated; 1.6s collecting garbage

Samples

1.4s	7 223×	0	invalid
1.1s	3 956×	1	valid
557.0ms	4 300×	0	valid

Precisions

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

ival-div: 920.0ms (38.2% of total)

ival-pow2: 512.0ms (21.3% of total)

ival-mult: 213.0ms (8.8% of total)

ival-asin: 192.0ms (8% of total)

adjust: 151.0ms (6.3% of total)

ival-sqrt: 146.0ms (6.1% of total)

ival-add: 141.0ms (5.9% of total)

ival-sub: 106.0ms (4.4% of total)

exact: 22.0ms (0.9% of total)

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

Bogosity

explain271.0ms (1.7%)

Memory

-18.6MiB live, 416.6MiB allocated; 22ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
38	0	-	4	(-1.92905425646154e-127 2.2936570679157766e-288 2.4971417020633574e-88 -8.061402840446523e+262)	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
11	112	(1.1242174745590951e+148 4.808772182265291e+289 -6.203757885073326e+83 -6.117335292897324e+251)	0	-	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`
4	1	(-1.92905425646154e-127 2.2936570679157766e-288 2.4971417020633574e-88 -8.061402840446523e+262)	0	-	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
0	0	-	0	-	`Om`
0	0	-	0	-	`t`
0	0	-	0	-	`(/.f64 t l)`
0	0	-	0	-	`#s(literal 1 binary64)`
0	0	-	0	-	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
0	0	-	0	-	`Omc`
0	0	-	0	-	`(-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))`
0	0	-	0	-	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
0	0	-	0	-	`(/.f64 Om Omc)`
0	0	-	0	-	`#s(literal 2 binary64)`
0	0	-	0	-	`l`
0	0	-	0	-	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
0	0	-	0	-	`(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`asin.f64`	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`	sensitivity	123	0
`sqrt.f64`	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`	uflow-rescue	34	0
↳	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`	underflow	66
↳	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`	underflow	66
↳	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`	underflow	32
↳	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`	underflow	66
↳	`(/.f64 t l)`	underflow	25
↳	`(/.f64 Om Omc)`	underflow	66
↳	`(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))`	underflow	153
`/.f64`	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`	n/o	5	0
↳	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`	overflow	71
↳	`(/.f64 t l)`	overflow	35
↳	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`	overflow	71
↳	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`	overflow	71

Confusion

	Predicted +	Predicted -
+	50	0
-	112	94

Precision

0.30864197530864196

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	50	0	0
-	112	0	94

Precision?

0.30864197530864196

Recall?

1.0

Freqs

test

number	freq
0	94
1	162

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

66.0ms	244×	1	valid
41.0ms	268×	0	valid

Compiler

Compiled 221 to 52 computations (76.5% saved)

Precisions

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

ival-div: 17.0ms (24.7% of total)

ival-pow2: 15.0ms (21.8% of total)

ival-asin: 9.0ms (13.1% of total)

adjust: 8.0ms (11.6% of total)

ival-sqrt: 5.0ms (7.3% of total)

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

ival-sub: 4.0ms (5.8% of total)

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

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

exact: 1.0ms (1.5% of total)

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

preprocess100.0ms (0.6%)

Memory

6.6MiB live, 97.8MiB allocated; 8ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	99	293
1	191	289
2	510	289
3	2248	289
0	16	19
0	26	19
1	41	19
2	96	19
3	373	19
4	1528	19
0	8029	15

Stop Event

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

Calls

Call 1

Inputs

(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))

Outputs

(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))

(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (-.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal -1 binary64)))))

Symmetry

(abs t)

(abs l)

(abs Om)

(abs Omc)

Compiler

Compiled 19 to 16 computations (15.8% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	84.9%	(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))

Status

Accuracy

Program

▶

84.9%

(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))

Compiler

Compiled 19 to 16 computations (15.8% saved)

series58.0ms (0.4%)

Memory

0.4MiB live, 97.0MiB allocated; 10ms collecting garbage

Counts

16 → 72

Calls

Call 1

Inputs
(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))
(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))
(/.f64 Om Omc)
Om
Omc
#s(literal 2 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))
(pow.f64 (/.f64 t l) #s(literal 2 binary64))
(/.f64 t l)
t
l

Outputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(hole binary64 1))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(hole binary64 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))
#s(approx (* 2 (pow (/ t l) 2)) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (pow (/ t l) 2) #s(hole binary64 (/ (pow t 2) (pow l 2))))
#s(approx (/ t l) #s(hole binary64 (/ t l)))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 (pow l 2))) (/ 1 (pow t 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(hole binary64 1))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(hole binary64 (+ 1 (* -1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (pow (/ Om Omc) 2) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx (/ Om Omc) #s(hole binary64 (/ Om Omc)))
#s(approx Om #s(hole binary64 Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(hole binary64 (* (pow Om 2) (- (/ 1 (pow Om 2)) (/ 1 (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(hole binary64 (/ (- (pow Omc 2) (pow Om 2)) (pow Omc 2))))
#s(approx Omc #s(hole binary64 Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))

Calls

12 calls:

Time	Variable		Point	Expression
13.0ms	l	@	inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (- 1 (pow (/ Om Omc) 2)) 1 (pow (/ Om Omc) 2) (/ Om Omc) Om Omc 2 (+ 1 (* 2 (pow (/ t l) 2))) (* 2 (pow (/ t l) 2)) (pow (/ t l) 2) (/ t l) t l)
6.0ms	Omc	@	0	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (- 1 (pow (/ Om Omc) 2)) 1 (pow (/ Om Omc) 2) (/ Om Omc) Om Omc 2 (+ 1 (* 2 (pow (/ t l) 2))) (* 2 (pow (/ t l) 2)) (pow (/ t l) 2) (/ t l) t l)
5.0ms	t	@	inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (- 1 (pow (/ Om Omc) 2)) 1 (pow (/ Om Omc) 2) (/ Om Omc) Om Omc 2 (+ 1 (* 2 (pow (/ t l) 2))) (* 2 (pow (/ t l) 2)) (pow (/ t l) 2) (/ t l) t l)
5.0ms	l	@	0	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (- 1 (pow (/ Om Omc) 2)) 1 (pow (/ Om Omc) 2) (/ Om Omc) Om Omc 2 (+ 1 (* 2 (pow (/ t l) 2))) (* 2 (pow (/ t l) 2)) (pow (/ t l) 2) (/ t l) t l)
4.0ms	Omc	@	inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (- 1 (pow (/ Om Omc) 2)) 1 (pow (/ Om Omc) 2) (/ Om Omc) Om Omc 2 (+ 1 (* 2 (pow (/ t l) 2))) (* 2 (pow (/ t l) 2)) (pow (/ t l) 2) (/ t l) t l)

rewrite103.0ms (0.6%)

Memory

33.6MiB live, 126.0MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	489	4837
0	505	4696
0	2774	3832

Stop Event

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

Counts

88 → 109

Calls

Call 1

Inputs
(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))
(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))
(/.f64 Om Omc)
Om
Omc
#s(literal 2 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))
(pow.f64 (/.f64 t l) #s(literal 2 binary64))
(/.f64 t l)
t
l
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(hole binary64 1))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(hole binary64 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))
#s(approx (* 2 (pow (/ t l) 2)) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (pow (/ t l) 2) #s(hole binary64 (/ (pow t 2) (pow l 2))))
#s(approx (/ t l) #s(hole binary64 (/ t l)))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 (pow l 2))) (/ 1 (pow t 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(hole binary64 1))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(hole binary64 (+ 1 (* -1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (pow (/ Om Omc) 2) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx (/ Om Omc) #s(hole binary64 (/ Om Omc)))
#s(approx Om #s(hole binary64 Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(hole binary64 (* (pow Om 2) (- (/ 1 (pow Om 2)) (/ 1 (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(hole binary64 (/ (- (pow Omc 2) (pow Om 2)) (pow Omc 2))))
#s(approx Omc #s(hole binary64 Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))

Outputs
(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))) (neg.f64 (+.f64 (*.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(-.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))
#s(literal 1 binary64)
(*.f64 (pow.f64 (/.f64 Om Omc) #s(literal 1 binary64)) (pow.f64 (/.f64 Om Omc) #s(literal 1 binary64)))
(*.f64 (/.f64 Om Omc) (/.f64 Om Omc))
(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 Om Omc)) #s(literal 2 binary64)))
(/.f64 (neg.f64 Om) (neg.f64 Omc))
(/.f64 Om Omc)
Om
Omc
#s(literal 2 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))
(+.f64 (*.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))
(+.f64 (pow.f64 (/.f64 t l) #s(literal 2 binary64)) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 t l) #s(literal 1 binary64)) (pow.f64 (/.f64 t l) #s(literal 1 binary64)))
(*.f64 (/.f64 t l) (/.f64 t l))
(pow.f64 (/.f64 t l) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 t l)) #s(literal 2 binary64)))
(/.f64 (neg.f64 t) (neg.f64 l))
(/.f64 t l)
t
l
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (neg.f64 (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (ratio-of-squares.f64 t l))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (-.f64 (neg.f64 (.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 t t) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (-.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (pow.f64 l #s(literal 4 binary64))) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))))))) (.f64 t t)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (pow.f64 l #s(literal 4 binary64))) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (.f64 l l))) (.f64 #s(literal -8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64))))) (.f64 t t))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (-.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (pow.f64 l #s(literal 4 binary64))) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))))))) (.f64 t t)) (neg.f64 (.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (*.f64 t t)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)) #s(literal 2 binary64))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 t t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l))) (*.f64 t t)) #s(literal 1 binary64)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 t t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64)))) #s(literal -8 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))) (.f64 t t)) (.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 l l)))) (.f64 t t)) #s(literal 1 binary64)) (ratio-of-squares.f64 Om Omc)))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) #s(literal 1 binary64))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
#s(approx (* 2 (pow (/ t l) 2)) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))
#s(approx (pow (/ t l) 2) (ratio-of-squares.f64 t l))
#s(approx (/ t l) (/.f64 t l))
#s(approx t t)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) #s(literal -1/2 binary64)) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64)))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))))) (.f64 (.f64 l (pow.f64 t #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64)))) t))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal -1/4 binary64))) (*.f64 t t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64))) #s(literal 1/8 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 (-.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))) #s(literal -1/16 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) (.f64 (pow.f64 l #s(literal -2 binary64)) #s(literal 2 binary64))) (*.f64 t t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) #s(literal -1/2 binary64)) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64)))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))))) (.f64 (.f64 l (pow.f64 t #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64)))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) t) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 l l)) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 t (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (.f64 (.f64 (.f64 l l) t) (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 8 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 t t)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (.f64 l l)) (.f64 (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) (.f64 l l)) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) l))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64))) #s(literal -1/4 binary64))) (*.f64 l l)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) #s(literal 1/8 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 l l)) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t))) (.f64 l l)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 8 binary64)))) #s(literal -1/16 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 l l)) (.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 4 binary64))))) (.f64 l l)) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t))) (*.f64 l l)))
#s(approx (+ 1 (* 2 (pow (/ t l) 2))) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) (ratio-of-squares.f64 l l)))
#s(approx l l)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (neg.f64 (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (ratio-of-squares.f64 t l))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (.f64 #s(literal -3 binary64) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) #s(literal -1/2 binary64))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 #s(literal -3 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -3 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 t t)) (.f64 (.f64 #s(literal 8 binary64) (pow.f64 t #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (neg.f64 (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (ratio-of-squares.f64 t l)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal -4 binary64) (pow.f64 t #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)) #s(literal 2 binary64)) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 t #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -4 binary64) (pow.f64 t #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))) (.f64 (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)) #s(literal 2 binary64))) (ratio-of-squares.f64 Om Omc))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 Om (.f64 Omc Omc))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Om Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/16 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal -4 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Om Om)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Om Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (+.f64 (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))) (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (/ Om Omc) 2)) #s(literal 1 binary64))
#s(approx (- 1 (pow (/ Om Omc) 2)) (+.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) #s(literal 1 binary64)))
#s(approx (pow (/ Om Omc) 2) (ratio-of-squares.f64 Om Omc))
#s(approx (/ Om Omc) (/.f64 Om Omc))
#s(approx Om Om)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 (/.f64 (/.f64 Omc (.f64 Om Om)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/8 binary64)) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 (/.f64 (/.f64 Omc (.f64 Om Om)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))) Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (+.f64 (.f64 (.f64 (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 6 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/16 binary64)) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 (/.f64 (/.f64 Omc (.f64 Om Om)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/8 binary64))) Om))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (-.f64 (/.f64 (pow.f64 Om #s(literal -2 binary64)) (+.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 Omc #s(literal -2 binary64)) (+.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))) (.f64 Om Om)))
#s(approx (- 1 (pow (/ Om Omc) 2)) (neg.f64 (ratio-of-squares.f64 Om Omc)))
#s(approx (- 1 (pow (/ Om Omc) 2)) (.f64 (-.f64 (pow.f64 Om #s(literal -2 binary64)) (pow.f64 Omc #s(literal -2 binary64))) (.f64 Om Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 (/.f64 (/.f64 Omc (.f64 Om Om)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (+.f64 (.f64 (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/8 binary64)) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 (/.f64 (/.f64 Omc (.f64 Om Om)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))) Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (+.f64 (+.f64 (.f64 (.f64 (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 6 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/16 binary64)) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 (/.f64 (/.f64 Omc (.f64 Om Om)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/8 binary64))) Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 (/.f64 (/.f64 (.f64 Omc Omc) Om) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/8 binary64))) (.f64 Omc Omc)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/16 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) #s(literal 3 binary64)) #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Omc Omc)) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Omc Omc)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Omc))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (+.f64 (/.f64 (.f64 Omc Omc) (+.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (/.f64 (.f64 Om Om) (+.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))) (*.f64 Omc Omc)))
#s(approx (- 1 (pow (/ Om Omc) 2)) (-.f64 (ratio-of-squares.f64 Omc Omc) (ratio-of-squares.f64 Om Omc)))
#s(approx Omc Omc)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/16 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))

eval220.0ms (1.4%)

Memory

-5.8MiB live, 372.3MiB allocated; 32ms collecting garbage

Samples

106.0ms	2 483×	0	valid
46.0ms	1 101×	0	invalid

Compiler

Compiled 4 947 to 775 computations (84.3% saved)

Precisions

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

ival-mult: 45.0ms (56.8% of total)

ival-div: 28.0ms (35.4% of total)

ival-add: 3.0ms (3.8% of total)

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

adjust: 1.0ms (1.3% of total)

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

prune433.0ms (2.7%)

Memory

-41.9MiB live, 501.8MiB allocated; 76ms collecting garbage

Pruning

10 alts after pruning (10 fresh and 0 done)

	Pruned	Kept	Total
New	102	10	112
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	103	10	113

Accuracy

98.8%

Counts

113 → 10

Alt Table

Click to see full alt table

Status	Accuracy	Program
	84.9%	(asin.f64 (sqrt.f64 (/.f64 (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))
	84.2%	(asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (pow (/ Om Omc) 2)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))
	70.4%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
▶	50.0%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
▶	24.1%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64)))))
▶	15.5%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
	50.4%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
▶	29.6%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l)))
	30.4%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) t) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 l l)) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) l)))
▶	85.0%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))

Samples

291.0ms	5 818×	0	valid
32.0ms	326×	0	invalid

Compiler

Compiled 786 to 544 computations (30.8% saved)

Precisions

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

ival-mult: 91.0ms (60.7% of total)

ival-div: 35.0ms (23.3% of total)

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

ival-true: 4.0ms (2.7% of total)

ival-assert: 2.0ms (1.3% of total)

adjust: 1.0ms (0.7% of total)

series153.0ms (0.9%)

Memory

22.3MiB live, 167.5MiB allocated; 13ms collecting garbage

Counts

47 → 304

Calls

Call 1

Inputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))
#s(literal 1 binary64)
(ratio-of-squares.f64 Om Omc)
Om
Omc
(+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))
(ratio-of-squares.f64 t l)
t
l
#s(literal 2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64)))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64))
(/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (*.f64 t t))
(.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(*.f64 l l)
(*.f64 t t)
#s(literal 1/2 binary64)
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l))
(.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l)
(+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)
(sqrt.f64 #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))
(*.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))
(pow.f64 t #s(literal 3/2 binary64))
#s(literal 3/2 binary64)
#s(literal -1/8 binary64)

Outputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 1))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))
#s(approx (* (/ (* t t) (* l l)) 2) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (/ (* t t) (* l l)) #s(hole binary64 (/ (pow t 2) (pow l 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* (pow t 2) (+ (* -4 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* (pow t 2) (+ (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))) (* (pow t 2) (+ (* -4 (/ (pow Om 2) (* (pow Omc 2) (pow l 4)))) (* 8 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 6)))))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* -2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* (pow t 2) (- (* 4 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 6)))) (* -4 (/ (pow Om 2) (* (pow Omc 2) (pow l 4)))))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1/8 (* (/ (pow l 3) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* (pow t 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (/ (sqrt 1/2) t) #s(hole binary64 (/ (sqrt 1/2) t)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) #s(hole binary64 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (pow t 3/2) #s(hole binary64 (sqrt (pow t 3))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 (pow l 2))) (/ 1 (pow t 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2))))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 8)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* 1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2))))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow Om 2) (pow l 8)) (* (pow Omc 2) (pow t 6)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))))) (pow t 2))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (/ (+ (* -1 (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/8 (* (/ (pow l 3) (* (pow t 2) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/8 (* (/ (pow l 2) (* (pow t 2) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* 1/8 (* (/ (pow l 2) (* (pow t 3) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* (/ (pow l 2) (* (pow t 3) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) #s(hole binary64 (* -1 (/ (pow l 2) (* (pow t 3) (* (pow (sqrt -1) 2) (sqrt 1/2)))))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (* -1 (/ (pow l 2) (* (pow t 3) (pow (sqrt -1) 2))))))
#s(approx (pow t 3/2) #s(hole binary64 (* (sqrt (pow t 3)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* 1/4 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* (pow l 2) (+ (* -1/8 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4)))))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* (pow l 2) (+ (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4)))) (* (pow l 2) (+ (* -1/8 (/ (pow Om 2) (* (pow Omc 2) (pow t 6)))) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 8)))))))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2)))) (* (pow l 2) (- (* 1/8 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4))))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2)))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 8)))) (* -1/8 (/ (pow Om 2) (* (pow Omc 2) (pow t 6)))))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4))))))))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (+ (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (* 8 (/ (* (pow Om 2) (pow t 6)) (* (pow Omc 2) (pow l 6)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ (* 4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (/ (pow Om 2) (pow Omc 2))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ (* -8 (/ (* (pow Om 2) (pow t 6)) (* (pow Omc 2) (pow l 6)))) (/ (pow Om 2) (pow Omc 2))) (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* (pow l 3) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1 (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 1))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (+ 1 (* -1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (* Om Om) (* Omc Omc)) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* 1/2 (/ (pow l 2) (pow t 2)))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (pow l 2) (pow t 2))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))) (/ (pow l 2) (pow t 2)))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (pow l 2)))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2))) (pow l 2))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2)))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (+ (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (+ (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (+ (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (* l (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) t))) (* 1/128 (/ (pow l 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2)))))))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (/ (sqrt 1/2) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (+ (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))))) (/ (sqrt 1/2) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (+ (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (+ (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) t))) (* 1/128 (/ (pow l 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))))))))))) (/ (sqrt 1/2) t)))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (sqrt 1/2) t)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (/ (sqrt 1/2) t))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* -1/8 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 4) t))))) (/ (sqrt 1/2) t))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* -1/16 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 6) t))))))) (/ (sqrt 1/2) t))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* -1/8 (/ (pow Om 2) (pow Omc 4))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* (pow Om 2) (- (* -1/16 (/ (pow Om 2) (pow Omc 6))) (* 1/8 (/ 1 (pow Omc 4))))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (* (pow Om 2) (+ (* 1/64 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (* (pow Om 2) (+ (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* 1/128 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (pow l 2) (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* -1/8 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))) (/ (pow l 2) (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* -1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))))))) (/ (pow l 2) (* (pow t 3) (sqrt 1/2))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (pow Om 2)) (/ 1 (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* (pow Om 2) (+ (* -1/2 (/ (pow l 2) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (pow l 2) (* (pow Om 2) (pow t 2))))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (* (pow Om 2) (+ (* -1 (/ (pow l 2) (* (pow Omc 2) (pow t 2)))) (/ (pow l 2) (* (pow Om 2) (pow t 2)))))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* (pow Om 2) (+ (* -1 (/ (pow l 2) (pow Omc 2))) (/ (pow l 2) (pow Om 2))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)) (/ (* l (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* t (pow (sqrt -1) 5)))))) (pow Om 6))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* Omc t))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (* Om (sqrt -1)) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (* Om (* (pow l 2) (sqrt -1))) (* Omc (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)) (/ (* l (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* t (pow (sqrt -1) 5)))))) (pow Om 6)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* Omc t)))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (* Om (sqrt -1)) Omc))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* 1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (/ (* Om (* (pow l 2) (sqrt -1))) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (/ (- (pow Omc 2) (pow Om 2)) (pow Omc 2))))
#s(approx Omc #s(hole binary64 Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (pow t 2))) (* 1/2 (/ (* (pow Omc 2) (pow l 2)) (pow t 2)))) (pow Omc 2))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (pow t 2))) (/ (* (pow Omc 2) (pow l 2)) (pow t 2))) (pow Omc 2))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* -1 (* (pow Om 2) (pow l 2))) (* (pow Omc 2) (pow l 2))) (pow Omc 2))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (+ (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (* (pow Omc 2) (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (+ (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (* (pow Omc 2) (+ (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))) (* (pow Omc 2) (* l (+ (* -1/128 (/ (pow l 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))))))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t)) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (+ (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* (pow Omc 2) (+ (* -1/128 (/ (pow l 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (sqrt 1/2)) (* Om (* t (sqrt -1))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t)) Omc)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t)) Omc)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/16 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t)) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow Omc 2) (* Om (sqrt -1)))) (* Om (sqrt -1))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* -1/8 (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* (pow Omc 2) (- (* 1/16 (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5)))) (* 1/8 (/ 1 (* (pow Om 3) (pow (sqrt -1) 3)))))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (* -1/16 (/ (* (pow Omc 2) (pow l 2)) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))) Omc)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/64 (/ (* (pow Omc 2) (pow l 2)) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))) Omc)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* (pow Omc 2) (+ (* -1/128 (/ (* (pow Omc 2) (pow l 2)) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))) Omc)))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (pow l 2)) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (pow l 2)) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* 1/2 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* 1/2 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* (pow Omc 2) (+ (* -1/8 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* 1/16 (/ (* (pow Omc 2) (pow l 2)) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))))))) (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (+ (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (/ (* l (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) t)) (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (+ (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (+ (/ (* l (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) t)) (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4)) (/ (* l (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) t)) (* 1/128 (/ (* (pow Om 6) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 6)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow Omc 6) t))) (+ (* 1/128 (/ (* (pow Om 6) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (/ (sqrt 1/2) t)))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow Omc 6) t))) (/ (sqrt 1/2) t))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (* -1/8 (/ (pow Om 4) (pow Omc 4)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (+ (* -1/8 (/ (pow Om 4) (pow Omc 4))) (* -1/16 (/ (pow Om 6) (pow Omc 6))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/128 (/ (* (pow Om 6) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* (pow Om 6) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (/ (pow l 2) (* (pow t 3) (sqrt 1/2))))))))

Calls

12 calls:

Time	Variable		Point	Expression
27.0ms	l	@	0	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (- 1 (/ (* Om Om) (* Omc Omc))) 1 (/ (* Om Om) (* Omc Omc)) Om Omc (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* l l) (* t t) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (sqrt 1/2) t) (sqrt 1/2) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (pow t 3/2) 3/2 -1/8)
21.0ms	Om	@	inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (- 1 (/ (* Om Om) (* Omc Omc))) 1 (/ (* Om Om) (* Omc Omc)) Om Omc (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* l l) (* t t) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (sqrt 1/2) t) (sqrt 1/2) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (pow t 3/2) 3/2 -1/8)
15.0ms	Omc	@	-inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (- 1 (/ (* Om Om) (* Omc Omc))) 1 (/ (* Om Om) (* Omc Omc)) Om Omc (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* l l) (* t t) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (sqrt 1/2) t) (sqrt 1/2) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (pow t 3/2) 3/2 -1/8)
10.0ms	t	@	-inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (- 1 (/ (* Om Om) (* Omc Omc))) 1 (/ (* Om Om) (* Omc Omc)) Om Omc (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* l l) (* t t) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (sqrt 1/2) t) (sqrt 1/2) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (pow t 3/2) 3/2 -1/8)
10.0ms	Omc	@	inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (- 1 (/ (* Om Om) (* Omc Omc))) 1 (/ (* Om Om) (* Omc Omc)) Om Omc (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* l l) (* t t) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (sqrt 1/2) t) (sqrt 1/2) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (pow t 3/2) 3/2 -1/8)

rewrite275.0ms (1.7%)

Memory

11.2MiB live, 340.8MiB allocated; 66ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1482	21392
0	1547	18213
0	8239	17739

Stop Event

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

Counts

351 → 469

Calls

Call 1

Inputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))
#s(literal 1 binary64)
(ratio-of-squares.f64 Om Omc)
Om
Omc
(+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))
(ratio-of-squares.f64 t l)
t
l
#s(literal 2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64)))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64))
(/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (*.f64 t t))
(.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(*.f64 l l)
(*.f64 t t)
#s(literal 1/2 binary64)
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l))
(.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l)
(+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)
(sqrt.f64 #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))
(*.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))
(pow.f64 t #s(literal 3/2 binary64))
#s(literal 3/2 binary64)
#s(literal -1/8 binary64)
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 1))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))
#s(approx (* (/ (* t t) (* l l)) 2) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (/ (* t t) (* l l)) #s(hole binary64 (/ (pow t 2) (pow l 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* (pow t 2) (+ (* -4 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* (pow t 2) (+ (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))) (* (pow t 2) (+ (* -4 (/ (pow Om 2) (* (pow Omc 2) (pow l 4)))) (* 8 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 6)))))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* -2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* (pow t 2) (- (* 4 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 6)))) (* -4 (/ (pow Om 2) (* (pow Omc 2) (pow l 4)))))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1/8 (* (/ (pow l 3) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* (pow t 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (/ (sqrt 1/2) t) #s(hole binary64 (/ (sqrt 1/2) t)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) #s(hole binary64 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (pow t 3/2) #s(hole binary64 (sqrt (pow t 3))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 (pow l 2))) (/ 1 (pow t 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2))))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 8)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* 1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2))))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow Om 2) (pow l 8)) (* (pow Omc 2) (pow t 6)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))))) (pow t 2))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (/ (+ (* -1 (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/8 (* (/ (pow l 3) (* (pow t 2) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/8 (* (/ (pow l 2) (* (pow t 2) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* 1/8 (* (/ (pow l 2) (* (pow t 3) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* (/ (pow l 2) (* (pow t 3) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) #s(hole binary64 (* -1 (/ (pow l 2) (* (pow t 3) (* (pow (sqrt -1) 2) (sqrt 1/2)))))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (* -1 (/ (pow l 2) (* (pow t 3) (pow (sqrt -1) 2))))))
#s(approx (pow t 3/2) #s(hole binary64 (* (sqrt (pow t 3)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* 1/4 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* (pow l 2) (+ (* -1/8 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4)))))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* (pow l 2) (+ (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4)))) (* (pow l 2) (+ (* -1/8 (/ (pow Om 2) (* (pow Omc 2) (pow t 6)))) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 8)))))))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2)))) (* (pow l 2) (- (* 1/8 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4))))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2)))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 8)))) (* -1/8 (/ (pow Om 2) (* (pow Omc 2) (pow t 6)))))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4))))))))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (+ (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (* 8 (/ (* (pow Om 2) (pow t 6)) (* (pow Omc 2) (pow l 6)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ (* 4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (/ (pow Om 2) (pow Omc 2))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ (* -8 (/ (* (pow Om 2) (pow t 6)) (* (pow Omc 2) (pow l 6)))) (/ (pow Om 2) (pow Omc 2))) (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* (pow l 3) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1 (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 1))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (+ 1 (* -1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (* Om Om) (* Omc Omc)) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* 1/2 (/ (pow l 2) (pow t 2)))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (pow l 2) (pow t 2))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))) (/ (pow l 2) (pow t 2)))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (pow l 2)))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2))) (pow l 2))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2)))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (+ (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (+ (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (+ (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (* l (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) t))) (* 1/128 (/ (pow l 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2)))))))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (/ (sqrt 1/2) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (+ (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))))) (/ (sqrt 1/2) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (+ (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (+ (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) t))) (* 1/128 (/ (pow l 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))))))))))) (/ (sqrt 1/2) t)))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (sqrt 1/2) t)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (/ (sqrt 1/2) t))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* -1/8 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 4) t))))) (/ (sqrt 1/2) t))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* -1/16 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 6) t))))))) (/ (sqrt 1/2) t))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* -1/8 (/ (pow Om 2) (pow Omc 4))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* (pow Om 2) (- (* -1/16 (/ (pow Om 2) (pow Omc 6))) (* 1/8 (/ 1 (pow Omc 4))))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (* (pow Om 2) (+ (* 1/64 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (* (pow Om 2) (+ (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* 1/128 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (pow l 2) (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* -1/8 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))) (/ (pow l 2) (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* -1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))))))) (/ (pow l 2) (* (pow t 3) (sqrt 1/2))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (pow Om 2)) (/ 1 (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* (pow Om 2) (+ (* -1/2 (/ (pow l 2) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (pow l 2) (* (pow Om 2) (pow t 2))))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (* (pow Om 2) (+ (* -1 (/ (pow l 2) (* (pow Omc 2) (pow t 2)))) (/ (pow l 2) (* (pow Om 2) (pow t 2)))))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* (pow Om 2) (+ (* -1 (/ (pow l 2) (pow Omc 2))) (/ (pow l 2) (pow Om 2))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)) (/ (* l (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* t (pow (sqrt -1) 5)))))) (pow Om 6))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* Omc t))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (* Om (sqrt -1)) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (* Om (* (pow l 2) (sqrt -1))) (* Omc (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)) (/ (* l (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* t (pow (sqrt -1) 5)))))) (pow Om 6)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* Omc t)))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (* Om (sqrt -1)) Omc))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* 1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (/ (* Om (* (pow l 2) (sqrt -1))) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (/ (- (pow Omc 2) (pow Om 2)) (pow Omc 2))))
#s(approx Omc #s(hole binary64 Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (pow t 2))) (* 1/2 (/ (* (pow Omc 2) (pow l 2)) (pow t 2)))) (pow Omc 2))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (pow t 2))) (/ (* (pow Omc 2) (pow l 2)) (pow t 2))) (pow Omc 2))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* -1 (* (pow Om 2) (pow l 2))) (* (pow Omc 2) (pow l 2))) (pow Omc 2))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (+ (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (* (pow Omc 2) (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (+ (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (* (pow Omc 2) (+ (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))) (* (pow Omc 2) (* l (+ (* -1/128 (/ (pow l 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))))))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t)) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (+ (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* (pow Omc 2) (+ (* -1/128 (/ (pow l 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (sqrt 1/2)) (* Om (* t (sqrt -1))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t)) Omc)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t)) Omc)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/16 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t)) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow Omc 2) (* Om (sqrt -1)))) (* Om (sqrt -1))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* -1/8 (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* (pow Omc 2) (- (* 1/16 (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5)))) (* 1/8 (/ 1 (* (pow Om 3) (pow (sqrt -1) 3)))))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (* -1/16 (/ (* (pow Omc 2) (pow l 2)) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))) Omc)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/64 (/ (* (pow Omc 2) (pow l 2)) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))) Omc)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* (pow Omc 2) (+ (* -1/128 (/ (* (pow Omc 2) (pow l 2)) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))) Omc)))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (pow l 2)) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (pow l 2)) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* 1/2 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* 1/2 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* (pow Omc 2) (+ (* -1/8 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* 1/16 (/ (* (pow Omc 2) (pow l 2)) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))))))) (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (+ (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (/ (* l (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) t)) (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (+ (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (+ (/ (* l (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) t)) (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4)) (/ (* l (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) t)) (* 1/128 (/ (* (pow Om 6) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 6)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow Omc 6) t))) (+ (* 1/128 (/ (* (pow Om 6) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (/ (sqrt 1/2) t)))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow Omc 6) t))) (/ (sqrt 1/2) t))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (* -1/8 (/ (pow Om 4) (pow Omc 4)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (+ (* -1/8 (/ (pow Om 4) (pow Omc 4))) (* -1/16 (/ (pow Om 6) (pow Omc 6))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/128 (/ (* (pow Om 6) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* (pow Om 6) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (/ (pow l 2) (* (pow t 3) (sqrt 1/2))))))))

Outputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(-.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc)) (.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))
#s(literal 1 binary64)
(*.f64 (pow.f64 (/.f64 Om Omc) #s(literal 1 binary64)) (pow.f64 (/.f64 Om Omc) #s(literal 1 binary64)))
(*.f64 (/.f64 Om Omc) (/.f64 Om Omc))
(.f64 Om (/.f64 Om (.f64 Omc Omc)))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) (neg.f64 Omc))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) (fabs.f64 Omc))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) Omc)
(ratio-of-squares.f64 (neg.f64 Om) (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 Om) (neg.f64 Omc))
(ratio-of-squares.f64 (neg.f64 Om) (fabs.f64 Omc))
(ratio-of-squares.f64 (neg.f64 Om) Omc)
(ratio-of-squares.f64 (fabs.f64 Om) (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 Om) (neg.f64 Omc))
(ratio-of-squares.f64 (fabs.f64 Om) (fabs.f64 Omc))
(ratio-of-squares.f64 (fabs.f64 Om) Omc)
(ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 Om (neg.f64 Omc))
(ratio-of-squares.f64 Om (fabs.f64 Omc))
(ratio-of-squares.f64 Om Omc)
(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 Om Om) Omc) Omc)
(/.f64 (neg.f64 (.f64 Om Om)) (neg.f64 (.f64 Omc Omc)))
(/.f64 (.f64 Om Om) (.f64 Omc Omc))
(exp.f64 (*.f64 (log.f64 (/.f64 Om Omc)) #s(literal 2 binary64)))
Om
Omc
(/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))
(*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (*.f64 l l))
(*.f64 (pow.f64 (/.f64 t l) #s(literal 1 binary64)) (pow.f64 (/.f64 t l) #s(literal 1 binary64)))
(*.f64 (/.f64 t l) (/.f64 t l))
(.f64 t (/.f64 t (.f64 l l)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) (neg.f64 l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) (fabs.f64 l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) l)
(ratio-of-squares.f64 (neg.f64 t) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 t) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 t) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 t) l)
(ratio-of-squares.f64 (fabs.f64 t) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 t) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 t) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 t) l)
(ratio-of-squares.f64 t (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 t (neg.f64 l))
(ratio-of-squares.f64 t (fabs.f64 l))
(ratio-of-squares.f64 t l)
(pow.f64 (/.f64 t l) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 t t) l) l)
(/.f64 (neg.f64 (.f64 t t)) (neg.f64 (.f64 l l)))
(/.f64 (.f64 t t) (.f64 l l))
(exp.f64 (*.f64 (log.f64 (/.f64 t l)) #s(literal 2 binary64)))
t
l
#s(literal 2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
(pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (ratio-of-squares.f64 Om Omc) (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (+.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)) #s(literal 1/2 binary64))))))
(pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)) #s(literal 1/2 binary64))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)) #s(literal 1/2 binary64)))
(.f64 (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)) #s(literal 1/2 binary64))
(/.f64 (.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)) (.f64 t t))
(.f64 (/.f64 (.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t))
(.f64 (.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (*.f64 t t)))
(/.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) t) t)
(/.f64 (neg.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (neg.f64 (*.f64 t t)))
(/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (*.f64 t t))
(.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(.f64 l (.f64 l (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (pow.f64 t #s(literal 1 binary64)) (pow.f64 t #s(literal 1 binary64)))
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 t t)
(pow.f64 t #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64))) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l)))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64))) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64))) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l))
(.f64 (+.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64))) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l)
(/.f64 (-.f64 (.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64))) (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64))))) (-.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t) (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) (-.f64 (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64))) (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64)))) (.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t) (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64)))))))
(-.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t) (.f64 (neg.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) #s(literal -1/8 binary64)))
(+.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64))) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t))
(+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t) (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)
(/.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (neg.f64 t))
(/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 1/2 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal -1/8 binary64)))
(.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))
(*.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (sqrt.f64 #s(literal 1/2 binary64)))
(/.f64 (.f64 (.f64 l l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (.f64 l l)) (neg.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))))
(/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (/.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 l (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 l (/.f64 l (pow.f64 t #s(literal 3 binary64))))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64)))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (neg.f64 l) (pow.f64 t #s(literal 3/2 binary64)))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (fabs.f64 l) (pow.f64 t #s(literal 3/2 binary64)))
(ratio-of-squares.f64 l (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 l (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))
(/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/4 binary64))) (pow.f64 t #s(literal 3/2 binary64)))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (pow.f64 t #s(literal 3 binary64))))
(/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 binary64)))
(*.f64 (pow.f64 t #s(literal 3/4 binary64)) (pow.f64 t #s(literal 3/4 binary64)))
(pow.f64 (pow.f64 t #s(literal 3 binary64)) #s(literal 1/2 binary64))
(pow.f64 t #s(literal 3/2 binary64))
(sqrt.f64 (pow.f64 t #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3/2 binary64)))
#s(literal 3/2 binary64)
#s(literal -1/8 binary64)
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))))))
#s(approx (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (.f64 (.f64 t t) (-.f64 (neg.f64 (.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 t t) (.f64 (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (.f64 (.f64 t t) (+.f64 (.f64 (.f64 t t) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 t t) (-.f64 (neg.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (.f64 l l))) (.f64 #s(literal -8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))))))) (neg.f64 (*.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (+.f64 (.f64 (.f64 t t) (-.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 t t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (*.f64 l l)))) #s(literal 1 binary64)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (+.f64 (.f64 (.f64 t t) (+.f64 (.f64 (.f64 t t) (-.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 t t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 l l))))) #s(literal 1 binary64)) (ratio-of-squares.f64 Om Omc)))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(literal 1 binary64))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64)))
#s(approx (* (/ (* t t) (* l l)) 2) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))
#s(approx (/ (* t t) (* l l)) (ratio-of-squares.f64 t l))
#s(approx t t)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (.f64 t t) (-.f64 (neg.f64 (.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 t t) (.f64 (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (.f64 t t) (+.f64 (.f64 (.f64 t t) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 t t) (-.f64 (neg.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (.f64 l l))) (.f64 #s(literal -8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))))))) (neg.f64 (*.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 (.f64 (.f64 t t) (-.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 t t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (*.f64 l l)))) #s(literal 1 binary64)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 (.f64 (.f64 t t) (+.f64 (.f64 (.f64 t t) (-.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 t t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 l l))))) #s(literal 1 binary64)) (ratio-of-squares.f64 Om Omc)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (neg.f64 (ratio-of-squares.f64 Om Omc)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l))) (ratio-of-squares.f64 Om Omc)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (-.f64 (.f64 (.f64 t t) (-.f64 (.f64 #s(literal -4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t (.f64 l l)))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) l)))) (ratio-of-squares.f64 Om Omc)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (-.f64 (.f64 (.f64 t t) (+.f64 (.f64 (.f64 t t) (+.f64 (.f64 #s(literal 8 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t (pow.f64 l #s(literal 3 binary64))))) (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l))))) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) l)))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (.f64 (.f64 t t) (-.f64 (.f64 #s(literal 4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t (.f64 l l)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) l)))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (.f64 (.f64 t t) (-.f64 (.f64 (.f64 t t) (-.f64 (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t (pow.f64 l #s(literal 3 binary64))))) (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l))))) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) l)))) (ratio-of-squares.f64 Om Omc)))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (.f64 (/.f64 (.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)))
#s(approx (* t t) (*.f64 t t))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 l (.f64 (.f64 t t) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (.f64 (.f64 t t) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t))
#s(approx (/ (sqrt 1/2) t) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (pow t 3/2) (pow.f64 t #s(literal 3/2 binary64)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))))) (.f64 (.f64 l (pow.f64 t #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (-.f64 (-.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (.f64 (.f64 t t) (+.f64 (pow.f64 t #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 l #s(literal -2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))))) (.f64 (.f64 l (pow.f64 t #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 (-.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)))) (*.f64 t t)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 t t)))) (.f64 #s(literal -1/4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)))) (.f64 t t)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 t t)))) (-.f64 (-.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 t #s(literal 3 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc))))) (.f64 t t)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 #s(literal 1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)))) (*.f64 t t)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (-.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 t t)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)))) (.f64 #s(literal 1/4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t)))) (.f64 t t)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 t #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 t t)))) (.f64 #s(literal -1/4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t))))) (.f64 t t)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (ratio-of-squares.f64 l t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (neg.f64 (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (neg.f64 (/.f64 (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (neg.f64 (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))))) (.f64 (.f64 l (pow.f64 t #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))))) (.f64 (.f64 l (pow.f64 t #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (neg.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (neg.f64 (.f64 l (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (neg.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 l t) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (neg.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (neg.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (neg.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1 binary64))))
#s(approx (pow t 3/2) (*.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal -1 binary64)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 l (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 l (+.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) t) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 l (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 t (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (.f64 (.f64 (.f64 l l) t) (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 8 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 (.f64 t t) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 l l) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (*.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 8 binary64))))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 4 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (*.f64 t t)))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) (ratio-of-squares.f64 l l)))
#s(approx l l)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 l (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 l (+.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) t) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 l (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 t (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (.f64 (.f64 (.f64 l l) t) (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 8 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 (.f64 t t) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 l l) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (*.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 8 binary64))))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 4 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (*.f64 t t)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (.f64 t t)))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) t)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal 1/4 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 t t))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) t)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (pow.f64 t #s(literal 4 binary64))))) (.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) (pow.f64 t #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 t t))))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) t)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 l l) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (.f64 t t)))) (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) t)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 t t))))) (*.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) t)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (pow.f64 t #s(literal 4 binary64))))) (.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) (pow.f64 t #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 t t))))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) t)))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (* l l) (*.f64 l l))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 l (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (+.f64 (neg.f64 (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 #s(literal -3 binary64) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 #s(literal -3 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (+.f64 (.f64 (.f64 t t) (.f64 #s(literal -3 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 #s(literal 8 binary64) (pow.f64 t #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (neg.f64 (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal -4 binary64) (pow.f64 t #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l))) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 t #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -4 binary64) (pow.f64 t #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)))) (ratio-of-squares.f64 Om Omc))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (neg.f64 (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 #s(literal -3 binary64) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 #s(literal -3 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (+.f64 (.f64 (.f64 t t) (.f64 #s(literal -3 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 #s(literal 8 binary64) (pow.f64 t #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (neg.f64 (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal -4 binary64) (pow.f64 t #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l))) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 t #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -4 binary64) (pow.f64 t #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)))) (ratio-of-squares.f64 Om Omc))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (-.f64 (-.f64 (.f64 #s(literal -4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 t t) (.f64 l l)))) (.f64 #s(literal -2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l)))) (ratio-of-squares.f64 Om Omc)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l)))) (.f64 #s(literal -4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 t t) (.f64 l l))))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 t t) (.f64 l l)))) (-.f64 (ratio-of-squares.f64 Om Omc) (.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (+.f64 (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))) (ratio-of-squares.f64 Om Omc)) (-.f64 (.f64 #s(literal -4 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 t t) (.f64 l l)))) (.f64 #s(literal -2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 (pow.f64 l #s(literal 3 binary64)) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (neg.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 Om (.f64 Omc Omc))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal -4 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64)))) (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (+.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) #s(literal 1 binary64)))
#s(approx (/ (* Om Om) (* Omc Omc)) (ratio-of-squares.f64 Om Omc))
#s(approx Om Om)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 Om (.f64 Omc Omc))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal -4 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (+.f64 (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64)))) (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (*.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 l t)))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (*.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 l t))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t)))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (*.f64 l l))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (neg.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc))) (*.f64 l l)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (.f64 (.f64 (.f64 Om Om) l) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Omc Omc) t)))) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 (.f64 Om Om) l) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (pow.f64 Omc #s(literal 4 binary64)) t)))) (.f64 l (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Omc Omc) t)))))) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 (.f64 Om Om) l) (+.f64 (.f64 #s(literal 1/128 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/16 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (pow.f64 Omc #s(literal 6 binary64)) t)))) (.f64 l (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (pow.f64 Omc #s(literal 4 binary64)) t)))))) (.f64 l (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Omc Omc) t)))))) (.f64 l (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Omc Omc) t)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)) (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (+.f64 (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (pow.f64 Omc #s(literal 4 binary64)) t)))) (.f64 #s(literal 1/16 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (*.f64 Omc Omc) t))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Omc Omc) t))) (.f64 (.f64 Om Om) (+.f64 (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal 1/128 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/16 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (pow.f64 Omc #s(literal 6 binary64)) t)))) (.f64 #s(literal 1/64 binary64) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 Omc #s(literal 4 binary64)) t))))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (/.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Omc Omc) t)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (/.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (pow.f64 Omc #s(literal 4 binary64)) t)))) (/.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (*.f64 Omc Omc) t)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1 binary64)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (.f64 (.f64 Om Om) (-.f64 (.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 Om (.f64 Omc Omc))) (*.f64 #s(literal 1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))))) #s(literal 1 binary64)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (.f64 (.f64 Om Om) (-.f64 (.f64 (.f64 Om Om) (-.f64 (.f64 #s(literal -1/16 binary64) (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 Omc #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))))) #s(literal 1 binary64)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (*.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/16 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal 1/128 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/64 binary64) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 Om (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 Om (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 Om (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 Om Om) (-.f64 (/.f64 (pow.f64 Om #s(literal -2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))) (/.f64 (pow.f64 Omc #s(literal -2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (neg.f64 (ratio-of-squares.f64 Om Omc)))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (.f64 (.f64 Om Om) (-.f64 (pow.f64 Om #s(literal -2 binary64)) (pow.f64 Omc #s(literal -2 binary64)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 Om (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 Om (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 Om (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 Om Om) (-.f64 (/.f64 (pow.f64 Om #s(literal -2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))) (/.f64 (pow.f64 Omc #s(literal -2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (ratio-of-squares.f64 l Om) (.f64 t t))) (.f64 #s(literal -1/2 binary64) (/.f64 (ratio-of-squares.f64 l Omc) (.f64 t t))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (.f64 (.f64 Om Om) (+.f64 (neg.f64 (/.f64 (ratio-of-squares.f64 l Omc) (.f64 t t))) (/.f64 (ratio-of-squares.f64 l Om) (.f64 t t)))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (neg.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc))))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 (.f64 Om Om) (+.f64 (ratio-of-squares.f64 l Om) (neg.f64 (ratio-of-squares.f64 l Omc)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 (.f64 Om l) (+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 Om (+.f64 (.f64 l (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 t (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Omc (.f64 l l))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 Om Om))) (.f64 l (+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 Om (+.f64 (+.f64 (.f64 l (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 l (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 t (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Omc (.f64 l l))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 Om Om)))) (.f64 l (+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 Om (+.f64 (+.f64 (+.f64 (.f64 l (/.f64 (-.f64 (.f64 #s(literal -1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 5 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 l (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 t (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Omc (.f64 l l))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 Om Om)))) (.f64 l (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 l (+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 Om (+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 Om (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t)) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Omc (.f64 l l))) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 Om (+.f64 (+.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t)))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 Om (+.f64 (+.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))))) (+.f64 (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t))) (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 #s(literal -1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (*.f64 (/.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t)))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t)))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (*.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 Om (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 Om (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 Om (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 Om (.f64 l l)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 Omc (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (.f64 Om (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (.f64 Om (+.f64 (-.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Omc (.f64 l l))) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal -1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (.f64 Om (+.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))))) (-.f64 (.f64 #s(literal -1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal -1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (.f64 (.f64 Om (.f64 l l)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (*.f64 Omc (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (.f64 l l))) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (.f64 l l))) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (.f64 l l))) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (neg.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (neg.f64 (.f64 Om (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (neg.f64 (.f64 Om (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (neg.f64 (.f64 Om (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (neg.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 Om (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 Om (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 Om (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (neg.f64 (.f64 (.f64 Om l) (+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (neg.f64 (.f64 Om (+.f64 (.f64 l (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 t (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Omc (.f64 l l))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 Om Om))) (.f64 l (+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (neg.f64 (.f64 Om (+.f64 (+.f64 (.f64 l (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 l (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 t (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Omc (.f64 l l))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 Om Om)))) (.f64 l (+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (neg.f64 (.f64 Om (+.f64 (+.f64 (+.f64 (.f64 l (/.f64 (-.f64 (.f64 #s(literal -1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 5 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 l (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 t (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Omc (.f64 l l))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 Om Om)))) (.f64 l (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 l (+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (neg.f64 (.f64 Om (+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (neg.f64 (.f64 Om (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t)) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Omc (.f64 l l))) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (neg.f64 (.f64 Om (+.f64 (+.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t)))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (neg.f64 (.f64 Om (+.f64 (+.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))))) (+.f64 (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t))) (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 #s(literal -1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (neg.f64 (*.f64 (/.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (neg.f64 (.f64 Om (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t)))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (neg.f64 (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t))))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (neg.f64 (.f64 Om (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 Om Om) t) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc) t))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (neg.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (neg.f64 (.f64 Om (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (neg.f64 (.f64 Om (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (neg.f64 (.f64 Om (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 Om (.f64 l l)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 Omc (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (neg.f64 (.f64 Om (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (neg.f64 (.f64 Om (+.f64 (-.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Omc (.f64 l l))) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal -1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (neg.f64 (.f64 Om (+.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))))) (-.f64 (.f64 #s(literal -1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal -1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (neg.f64 (/.f64 (.f64 (.f64 Om (.f64 l l)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (*.f64 Omc (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (neg.f64 (.f64 Om (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (.f64 l l))) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (neg.f64 (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (.f64 l l))) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (neg.f64 (.f64 Om (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc (.f64 l l))) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc Omc)) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) Omc))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))) (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) Omc))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)) #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) Omc))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (+.f64 (/.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))) (neg.f64 (/.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))))) (*.f64 Omc Omc)))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (-.f64 (ratio-of-squares.f64 Omc Omc) (ratio-of-squares.f64 Om Omc)))
#s(approx Omc Omc)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc Omc)) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))) (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)) #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))) (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) Omc))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (+.f64 (/.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))) (neg.f64 (/.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))))) (*.f64 Omc Omc)))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Om Om) (ratio-of-squares.f64 l t))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Omc Omc) (ratio-of-squares.f64 l t)))) (*.f64 Omc Omc)))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (/.f64 (+.f64 (neg.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 l t))) (.f64 (.f64 Omc Omc) (ratio-of-squares.f64 l t))) (*.f64 Omc Omc)))
#s(approx (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (neg.f64 (pow.f64 (.f64 Om l) #s(literal 2 binary64))) (pow.f64 (.f64 Omc l) #s(literal 2 binary64))) (*.f64 Omc Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 l (/.f64 (+.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 (.f64 (.f64 Omc Omc) l) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 l l)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 l (+.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))))) Omc))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 (.f64 Omc Omc) l) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 3/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) t) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (.f64 l (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 l l)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))))))) (.f64 l (+.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (*.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))))) Omc))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 (.f64 Omc Omc) l) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 (pow.f64 Om #s(literal 5 binary64)) t) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (.f64 #s(literal -1/128 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 5/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 l (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 3/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) t) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (.f64 l (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 l l)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))))))) (.f64 l (+.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))))) Omc))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (*.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))) Omc))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 Omc Omc) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 l l)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t)) Omc))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 3/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) t) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 l l)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t)) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))) Omc))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 Omc Omc) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 l l)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 (.f64 Omc Omc) (+.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 (pow.f64 Om #s(literal 5 binary64)) t) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (.f64 #s(literal -1/128 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 5/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 #s(literal 1/64 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 3/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (/.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) t) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t)) Omc))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 Omc Omc) (/.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t)) Omc))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t)) Omc))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (/.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) t) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t)) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc Omc)) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (*.f64 Om (sqrt.f64 #s(literal -1 binary64)))) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (/.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))))) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) Omc))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (.f64 Omc l) #s(literal 2 binary64)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))))) Omc))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (.f64 Omc Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 3/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 l l)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (*.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))) Omc))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (.f64 Omc Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 5/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/64 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 3/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 l l)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))) Omc))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (.f64 Omc l) #s(literal 2 binary64)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (*.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) Omc))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 Omc Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 3/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) Omc))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 Omc Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 5/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 Om #s(literal 3/2 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 Om (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (*.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) Omc))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Om #s(literal 4 binary64))) (pow.f64 Omc #s(literal 4 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Om #s(literal 4 binary64))) (pow.f64 Omc #s(literal 4 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 Om #s(literal 6 binary64))) (pow.f64 Omc #s(literal 6 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Om #s(literal 4 binary64))) (pow.f64 Omc #s(literal 4 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Om #s(literal 4 binary64))) (pow.f64 Omc #s(literal 4 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 Om #s(literal 6 binary64))) (pow.f64 Omc #s(literal 6 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (.f64 l (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 Omc Omc))) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (+.f64 (.f64 l (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 Omc Omc))) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))) (.f64 l (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 Om #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/64 binary64) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 Omc #s(literal 4 binary64))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (+.f64 (+.f64 (.f64 l (/.f64 (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (pow.f64 Om #s(literal 6 binary64)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/128 binary64) (.f64 (pow.f64 Om #s(literal 6 binary64)) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 Omc #s(literal 6 binary64)))) (.f64 l (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 Om #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/64 binary64) (.f64 (pow.f64 Om #s(literal 4 binary64)) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 Omc #s(literal 4 binary64))))) (.f64 l (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 Omc Omc)))) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 Om #s(literal 4 binary64)) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))) (.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (+.f64 (.f64 #s(literal 1/128 binary64) (.f64 (pow.f64 Om #s(literal 6 binary64)) (/.f64 (ratio-of-squares.f64 l (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 Om #s(literal 4 binary64)) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))))) (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)) (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))
#s(approx (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))) (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Om #s(literal 4 binary64))) (pow.f64 Omc #s(literal 4 binary64)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Om #s(literal 4 binary64))) (pow.f64 Omc #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc))) (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 Om #s(literal 6 binary64))) (pow.f64 Omc #s(literal 6 binary64)))) #s(literal 1 binary64)))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 Om #s(literal 4 binary64)) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/16 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8) (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/128 binary64) (.f64 (pow.f64 Om #s(literal 6 binary64)) (/.f64 (ratio-of-squares.f64 l (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (-.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 Om #s(literal 4 binary64)) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 Om #s(literal 4 binary64)) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (pow.f64 Om #s(literal 6 binary64)) (/.f64 (ratio-of-squares.f64 l (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 Om #s(literal 4 binary64)) (/.f64 (ratio-of-squares.f64 l (.f64 Omc Omc)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))))

eval1.5s (9%)

Memory

101.9MiB live, 1 968.2MiB allocated; 427ms collecting garbage

Samples

733.0ms	16 388×	0	valid
274.0ms	6 140×	0	invalid

Compiler

Compiled 45 177 to 4 419 computations (90.2% saved)

Precisions

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

ival-mult: 339.0ms (67.9% of total)

ival-div: 130.0ms (26% of total)

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

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

adjust: 5.0ms (1% of total)

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

prune660.0ms (4.1%)

Memory

27.6MiB live, 881.9MiB allocated; 242ms collecting garbage

Pruning

18 alts after pruning (17 fresh and 1 done)

	Pruned	Kept	Total
New	716	16	732
Fresh	4	1	5
Picked	4	1	5
Done	0	0	0
Total	724	18	742

Accuracy

98.9%

Counts

742 → 18

Alt Table

Click to see full alt table

Status	Accuracy	Program
	70.4%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
	50.0%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
✓	50.0%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
	24.1%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 #s(approx ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 l l)) (.f64 t t)) #s(literal 1/2 binary64)))))
	26.3%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)) #s(literal 1/2 binary64)))))
	37.4%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))
	37.6%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64)))))
	9.9%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
▶	49.6%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
▶	50.4%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
	14.1%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (.f64 (.f64 Om Om) (-.f64 (pow.f64 Om #s(literal -2 binary64)) (pow.f64 Omc #s(literal -2 binary64))))))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l)))
	15.4%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (.f64 (.f64 t t) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (pow.f64 t #s(literal 3 binary64)))) l)))
	50.4%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l)))
▶	17.8%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l)))
	12.2%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 l (.f64 (.f64 t t) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (pow.f64 t #s(literal 3 binary64))))))
	16.1%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 (pow.f64 l #s(literal 3 binary64)) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
▶	84.9%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
▶	84.3%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))

Samples

467.0ms	9 658×	0	valid
17.0ms	326×	0	invalid

Compiler

Compiled 1 953 to 1 260 computations (35.5% saved)

Precisions

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

ival-mult: 140.0ms (65.7% of total)

ival-div: 60.0ms (28.2% of total)

ival-true: 5.0ms (2.3% of total)

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

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

adjust: 2.0ms (0.9% of total)

series149.0ms (0.9%)

Memory

-40.1MiB live, 214.3MiB allocated; 49ms collecting garbage

Counts

48 → 414

Calls

Call 1

Inputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))
#s(literal 1 binary64)
(ratio-of-squares.f64 Om Omc)
Om
Omc
(sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))
(ratio-of-squares.f64 t l)
t
l
#s(literal 2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
(/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)
(.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
#s(literal 1/2 binary64)
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l))
(.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l)
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))
(.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
(*.f64 l l)
(+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
(/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (*.f64 l l) t))
(.f64 (.f64 l l) t)
(.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(literal -1/8 binary64)
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64)))
(pow.f64 t #s(literal 3 binary64))
#s(literal 3 binary64)
(sqrt.f64 #s(literal 1/2 binary64))

Outputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (/ (pow t 2) (pow l 2)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* -1/2 (/ (pow t 2) (pow l 4))) (/ 1 (pow l 2)))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* (pow t 2) (- (* 1/2 (/ (pow t 2) (pow l 6))) (* 1/2 (/ 1 (pow l 4))))) (/ 1 (pow l 2)))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 1))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))
#s(approx (* (/ (* t t) (* l l)) 2) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (/ (* t t) (* l l)) #s(hole binary64 (/ (pow t 2) (pow l 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1/8 (* (/ (pow l 3) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* (pow t 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* (pow t 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ 1 (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (* (pow t 2) (sqrt 1/2)) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (* l l) t) #s(hole binary64 (* (pow l 2) t)))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (/ (/ 1 (pow t 3)) (sqrt 1/2)) #s(hole binary64 (/ 1 (* (pow t 3) (sqrt 1/2)))))
#s(approx (/ 1 (pow t 3)) #s(hole binary64 (/ 1 (pow t 3))))
#s(approx (pow t 3) #s(hole binary64 (pow t 3)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (* t (sqrt 2)) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/16 (/ (pow l 5) (* (pow t 6) (pow (sqrt 2) 5)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 (pow l 2))) (/ 1 (pow t 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ 1 (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (/ (* t (sqrt 2)) l))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/16 (/ (pow l 5) (* (pow t 6) (pow (sqrt 2) 5)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (/ (+ (* -1 (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/8 (* (/ (pow l 3) (* (pow t 2) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/8 (* (/ (pow l 2) (* (pow t 2) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/8 (* (/ (pow l 2) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (sqrt 1/2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/8 (* (/ 1 (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (* t (sqrt 2)))) (* t (sqrt 2))) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* t (sqrt 2)) (* (pow l 2) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (pow (sqrt 2) 3)))) (* 1/2 (/ 1 (* t (sqrt 2))))))) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* t (sqrt 2)) (* (pow l 2) (+ (* (pow l 2) (- (* 1/16 (/ (pow l 2) (* (pow t 5) (pow (sqrt 2) 5)))) (* 1/8 (/ 1 (* (pow t 3) (pow (sqrt 2) 3)))))) (* 1/2 (/ 1 (* t (sqrt 2))))))) l)))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow l 2))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow t 4) (pow l 4))) (/ (pow t 2) (pow l 2))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow t 4) (pow l 4))) (+ (* 1/2 (/ (pow t 6) (pow l 6))) (/ (pow t 2) (pow l 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* (pow l 3) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1 (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* -1/8 (/ (pow Om 2) (pow Omc 4))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* (pow Om 2) (- (* -1/16 (/ (pow Om 2) (pow Omc 6))) (* 1/8 (/ 1 (pow Omc 4))))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 1))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (+ 1 (* -1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (* Om Om) (* Omc Omc)) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (/ (* l (sqrt 1/2)) t)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (* (pow Omc 2) t))) (/ (* l (sqrt 1/2)) t))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (* l (sqrt 1/2)) (* (pow Omc 2) t))) (* -1/8 (/ (* (pow Om 2) (* l (sqrt 1/2))) (* (pow Omc 4) t))))) (/ (* l (sqrt 1/2)) t))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (* l (sqrt 1/2)) (* (pow Omc 2) t))) (* (pow Om 2) (+ (* -1/8 (/ (* l (sqrt 1/2)) (* (pow Omc 4) t))) (* -1/16 (/ (* (pow Om 2) (* l (sqrt 1/2))) (* (pow Omc 6) t))))))) (/ (* l (sqrt 1/2)) t))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* l (sqrt 1/2))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (pow Omc 2))) (* l (sqrt 1/2)))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (+ (* l (sqrt 1/2)) (* (pow Om 2) (+ (* -1/2 (/ (* l (sqrt 1/2)) (pow Omc 2))) (* -1/8 (/ (* (pow Om 2) (* l (sqrt 1/2))) (pow Omc 4))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (+ (* l (sqrt 1/2)) (* (pow Om 2) (+ (* -1/2 (/ (* l (sqrt 1/2)) (pow Omc 2))) (* (pow Om 2) (+ (* -1/8 (/ (* l (sqrt 1/2)) (pow Omc 4))) (* -1/16 (/ (* (pow Om 2) (* l (sqrt 1/2))) (pow Omc 6))))))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (pow Omc 2))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (sqrt 1/2) (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (pow Omc 2))) (* -1/8 (/ (* (pow Om 2) (sqrt 1/2)) (pow Omc 4))))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (sqrt 1/2) (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (pow Omc 2))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (pow Omc 4))) (* -1/16 (/ (* (pow Om 2) (sqrt 1/2)) (pow Omc 6))))))))))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1/2))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1/2 (* -1/2 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2)))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (+ (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (+ (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (+ (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (* l (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) t))) (* 1/128 (/ (pow l 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2)))))))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (/ (sqrt 1/2) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (+ (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))))) (/ (sqrt 1/2) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (+ (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (+ (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) t))) (* 1/128 (/ (pow l 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))))))))))) (/ (sqrt 1/2) t)))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow Om 2) (* (pow l 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2)))))))) (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* (pow Om 2) (* (pow l 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) (* (pow l 2) t)))) (* 1/64 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))) (* (pow l 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))))) (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* (pow Om 2) (+ (* (pow Om 2) (* (pow l 2) (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) (* (pow l 2) t)))) (* 1/128 (/ 1 (* (pow Omc 6) (* (pow t 3) (sqrt 1/2)))))))) (* (pow l 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) (* (pow l 2) t)))) (* 1/64 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))))) (* (pow l 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))))) (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (/ (sqrt 1/2) (* (pow l 2) t))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) (* (pow l 2) t)))) (* 1/64 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))))) (/ (sqrt 1/2) (* (pow l 2) t))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) (* (pow l 2) t)))) (+ (* 1/64 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) (* (pow l 2) t)))) (* 1/128 (/ 1 (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))))))))))) (/ (sqrt 1/2) (* (pow l 2) t))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (/ (sqrt 1/2) (* (pow l 2) t))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (/ (sqrt 1/2) (* (pow l 2) t)))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* -1/8 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 4) (* (pow l 2) t)))))) (/ (sqrt 1/2) (* (pow l 2) t)))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) (* (pow l 2) t)))) (* -1/16 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 6) (* (pow l 2) t)))))))) (/ (sqrt 1/2) (* (pow l 2) t)))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ -1/8 (* (pow t 3) (sqrt 1/2)))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (- (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (- (* (pow Om 2) (+ (* 1/64 (/ (pow Om 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (- (* (pow Om 2) (+ (* (pow Om 2) (+ (* 1/128 (/ (pow Om 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (* 1/64 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ 1 (* (pow t 3) (sqrt 1/2)))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ 1 (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (- (* -1/8 (/ (pow Om 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/2 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (/ 1 (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (- (* (pow Om 2) (- (* -1/16 (/ (pow Om 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (* 1/8 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))) (* 1/2 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (/ 1 (* (pow t 3) (sqrt 1/2))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (* Om (sqrt -1)) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (pow Om 2)) (/ 1 (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) (* Omc t))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t)))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/16 (/ (* (pow Omc 5) (* l (sqrt 1/2))) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) Omc)))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc)))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (* (pow Omc 5) (* l (sqrt 1/2))) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (* Om (* (sqrt -1) (sqrt 1/2))) Omc)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc)))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc)))))))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1/2 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* (pow Om 2) (- (* 1/2 (/ 1 (pow Om 2))) (* 1/2 (/ 1 (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)) (/ (* l (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* t (pow (sqrt -1) 5)))))) (pow Om 6))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* Om (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (+ (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow Omc 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (+ (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow Omc 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2)) (/ (* (pow l 2) (+ (* -1/128 (/ (pow Omc 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 5))))))) (pow Om 6))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* Omc (* (pow l 2) t)))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1/8 (/ (* Om (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (* Om (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (* Om (sqrt -1)) Omc))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* -1 (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) (* Omc t)))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t)))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/16 (/ (* (pow Omc 5) (* l (sqrt 1/2))) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t)))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) Omc))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc)))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (* (pow Omc 5) (* l (sqrt 1/2))) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc))))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (/ (* Om (* (sqrt -1) (sqrt 1/2))) Omc))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)) (/ (* l (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* t (pow (sqrt -1) 5)))))) (pow Om 6)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1 (* Om (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (+ (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow Omc 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (+ (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow Omc 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2)) (/ (* (pow l 2) (+ (* -1/128 (/ (pow Omc 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 5))))))) (pow Om 6)))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* -1 (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* Omc (* (pow l 2) t))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* 1/8 (/ (* Om (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (/ (* Om (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow Omc 2) (* Om (sqrt -1)))) (* Om (sqrt -1))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* -1/8 (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* (pow Omc 2) (- (* 1/16 (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5)))) (* 1/8 (/ 1 (* (pow Om 3) (pow (sqrt -1) 3)))))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (/ (- (pow Omc 2) (pow Om 2)) (pow Omc 2))))
#s(approx Omc #s(hole binary64 Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* Om (* t (sqrt -1))))) (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) t)) Omc)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/2 (/ (* l (sqrt 1/2)) (* Om (* t (sqrt -1))))))) (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) t)) Omc)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* 1/2 (/ (* l (sqrt 1/2)) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (* l (sqrt 1/2)) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/16 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))) (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) t)) Omc)))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* Om (sqrt -1)))) (* Om (* l (* (sqrt -1) (sqrt 1/2))))) Omc)))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (* l (sqrt 1/2)) (* Om (sqrt -1))))))) Omc)))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) (* (pow Omc 2) (+ (* 1/2 (/ (* l (sqrt 1/2)) (* Om (sqrt -1)))) (* (pow Omc 2) (+ (* -1/8 (/ (* l (sqrt 1/2)) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/16 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* (pow Om 5) (pow (sqrt -1) 5))))))))) Omc)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (sqrt 1/2)) (* Om (sqrt -1)))) (* Om (* (sqrt -1) (sqrt 1/2)))) Omc)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (sqrt 1/2) (* Om (sqrt -1))))))) Omc)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow Omc 2) (+ (* 1/2 (/ (sqrt 1/2) (* Om (sqrt -1)))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/16 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 5) (pow (sqrt -1) 5))))))))) Omc)))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* -1/2 (pow Om 2)) (* 1/2 (pow Omc 2))) (pow Omc 2))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (+ (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (* (pow Omc 2) (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (+ (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (* (pow Omc 2) (+ (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))) (* (pow Omc 2) (* l (+ (* -1/128 (/ (pow l 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))))))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t)) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (+ (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* (pow Omc 2) (+ (* -1/128 (/ (pow l 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (* (pow l 2) (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t)))) Omc)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (* (pow l 2) (- (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))))) (* (pow l 2) (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))))) Omc)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* (pow Omc 2) (* (pow l 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (* 1/64 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))) (* (pow l 2) (- (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))))) (* (pow l 2) (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))))) Omc)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* (pow Omc 2) (+ (* (pow Omc 2) (* (pow l 2) (- (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (* 1/128 (/ 1 (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))))))) (* (pow l 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (* 1/64 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))) (* (pow l 2) (- (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))))) (* (pow l 2) (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))))) Omc)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))) Omc)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (- (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t)))) Omc)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (- (+ (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (* 1/64 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t)))) Omc)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (- (+ (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* 1/64 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* (pow Omc 2) (- (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (* 1/128 (/ 1 (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))))))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t)))) Omc)))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (sqrt 1/2)) (* Om (* (pow l 2) (* t (sqrt -1)))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))) Omc)))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))) Omc)))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (* 1/16 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 5) (* (pow l 2) (* t (pow (sqrt -1) 5)))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))) Omc)))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (* -1/16 (/ (pow Omc 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))) Omc)))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (* (pow Omc 2) (- (* 1/64 (/ (pow Omc 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))))) Omc)))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (* (pow Omc 2) (- (* (pow Omc 2) (+ (* -1/128 (/ (pow Omc 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))))) Omc)))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow Omc 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* -1/8 (/ (pow Omc 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* 1/2 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* (pow Omc 2) (- (* 1/16 (/ (pow Omc 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/8 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))) (* 1/2 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (* -1/8 (/ (pow Om 4) (pow Omc 4)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (+ (* -1/8 (/ (pow Om 4) (pow Omc 4))) (* -1/16 (/ (pow Om 6) (pow Omc 6))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (* l (sqrt 1/2))) (* (pow Omc 4) t))) (/ (* l (sqrt 1/2)) t)))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (* l (sqrt 1/2))) (* (pow Omc 4) t))) (+ (* -1/16 (/ (* (pow Om 6) (* l (sqrt 1/2))) (* (pow Omc 6) t))) (/ (* l (sqrt 1/2)) t))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (pow Omc 2))) (+ (* -1/8 (/ (* (pow Om 4) (* l (sqrt 1/2))) (pow Omc 4))) (* l (sqrt 1/2))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (pow Omc 2))) (+ (* -1/8 (/ (* (pow Om 4) (* l (sqrt 1/2))) (pow Omc 4))) (+ (* -1/16 (/ (* (pow Om 6) (* l (sqrt 1/2))) (pow Omc 6))) (* l (sqrt 1/2)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (pow Omc 2))) (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (pow Omc 4)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (pow Omc 2))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (pow Omc 4))) (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (pow Omc 6))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (+ (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (/ (* l (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) t)) (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (+ (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (+ (/ (* l (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) t)) (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4)) (/ (* l (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) t)) (* 1/128 (/ (* (pow Om 6) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 6)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow Omc 6) t))) (+ (* 1/128 (/ (* (pow Om 6) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))) (/ (* (pow l 2) (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) t))) (* 1/16 (/ (pow Om 2) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))) (+ (/ (* (pow l 2) (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) t))) (* 1/16 (/ (pow Om 2) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow l 2) t))) (* 1/64 (/ (pow Om 4) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))) (+ (/ (* (pow l 2) (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) t))) (* 1/16 (/ (pow Om 2) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (+ (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow l 2) t))) (* 1/64 (/ (pow Om 4) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4)) (/ (* (pow l 2) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow l 2) t))) (* 1/128 (/ (pow Om 6) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 6)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) (* (pow l 2) t)))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) (* (pow l 2) t)))) (+ (* 1/64 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) (* (pow l 2) t)))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) (* (pow l 2) t)))) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow Omc 6) (* (pow l 2) t)))) (+ (* 1/128 (/ (pow Om 6) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/64 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) (* (pow l 2) t)))))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) (* (pow l 2) t)))) (/ (sqrt 1/2) (* (pow l 2) t))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) (* (pow l 2) t)))) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow Omc 6) (* (pow l 2) t)))) (/ (sqrt 1/2) (* (pow l 2) t)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (- (+ (* 1/64 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2)))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (- (+ (* 1/128 (/ (pow Om 6) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/64 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (pow Om 6) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (/ 1 (* (pow t 3) (sqrt 1/2))))))))

Calls

12 calls:

Time	Variable		Point	Expression
28.0ms	Omc	@	0	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (- 1 (/ (* Om Om) (* Omc Omc))) 1 (/ (* Om Om) (* Omc Omc)) Om Omc (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (- 1 (/ (* Om Om) (* Omc Omc))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* (* l l) t) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (/ 1 (pow t 3)) (sqrt 1/2)) (/ 1 (pow t 3)) (pow t 3) 3 (sqrt 1/2))
17.0ms	t	@	0	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (- 1 (/ (* Om Om) (* Omc Omc))) 1 (/ (* Om Om) (* Omc Omc)) Om Omc (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (- 1 (/ (* Om Om) (* Omc Omc))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* (* l l) t) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (/ 1 (pow t 3)) (sqrt 1/2)) (/ 1 (pow t 3)) (pow t 3) 3 (sqrt 1/2))
11.0ms	Om	@	inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (- 1 (/ (* Om Om) (* Omc Omc))) 1 (/ (* Om Om) (* Omc Omc)) Om Omc (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (- 1 (/ (* Om Om) (* Omc Omc))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* (* l l) t) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (/ 1 (pow t 3)) (sqrt 1/2)) (/ 1 (pow t 3)) (pow t 3) 3 (sqrt 1/2))
9.0ms	t	@	-inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (- 1 (/ (* Om Om) (* Omc Omc))) 1 (/ (* Om Om) (* Omc Omc)) Om Omc (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (- 1 (/ (* Om Om) (* Omc Omc))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* (* l l) t) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (/ 1 (pow t 3)) (sqrt 1/2)) (/ 1 (pow t 3)) (pow t 3) 3 (sqrt 1/2))
8.0ms	l	@	0	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (- 1 (/ (* Om Om) (* Omc Omc))) 1 (/ (* Om Om) (* Omc Omc)) Om Omc (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (- 1 (/ (* Om Om) (* Omc Omc))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* (* l l) t) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/ (/ 1 (pow t 3)) (sqrt 1/2)) (/ 1 (pow t 3)) (pow t 3) 3 (sqrt 1/2))

rewrite254.0ms (1.6%)

Memory

4.6MiB live, 385.4MiB allocated; 53ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2004	31746
0	2065	27928
0	8119	27456

Stop Event

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

Counts

462 → 546

Calls

Call 1

Inputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))
#s(literal 1 binary64)
(ratio-of-squares.f64 Om Omc)
Om
Omc
(sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))
(ratio-of-squares.f64 t l)
t
l
#s(literal 2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
(/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)
(.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
#s(literal 1/2 binary64)
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l))
(.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l)
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))
(.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
(*.f64 l l)
(+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
(/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (*.f64 l l) t))
(.f64 (.f64 l l) t)
(.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(literal -1/8 binary64)
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64)))
(pow.f64 t #s(literal 3 binary64))
#s(literal 3 binary64)
(sqrt.f64 #s(literal 1/2 binary64))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (/ (pow t 2) (pow l 2)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* -1/2 (/ (pow t 2) (pow l 4))) (/ 1 (pow l 2)))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* (pow t 2) (- (* 1/2 (/ (pow t 2) (pow l 6))) (* 1/2 (/ 1 (pow l 4))))) (/ 1 (pow l 2)))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 1))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))
#s(approx (* (/ (* t t) (* l l)) 2) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (/ (* t t) (* l l)) #s(hole binary64 (/ (pow t 2) (pow l 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (asin (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1/8 (* (/ (pow l 3) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* (pow t 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* (pow t 2) (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ 1 (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (* (pow t 2) (sqrt 1/2)) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 3))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (* l l) t) #s(hole binary64 (* (pow l 2) t)))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (/ (/ 1 (pow t 3)) (sqrt 1/2)) #s(hole binary64 (/ 1 (* (pow t 3) (sqrt 1/2)))))
#s(approx (/ 1 (pow t 3)) #s(hole binary64 (/ 1 (pow t 3))))
#s(approx (pow t 3) #s(hole binary64 (pow t 3)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (* t (sqrt 2)) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/16 (/ (pow l 5) (* (pow t 6) (pow (sqrt 2) 5)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 (pow l 2))) (/ 1 (pow t 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ 1 (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (/ (* t (sqrt 2)) l))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/16 (/ (pow l 5) (* (pow t 6) (pow (sqrt 2) 5)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (/ (+ (* -1 (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/8 (* (/ (pow l 3) (* (pow t 2) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/8 (* (/ (pow l 2) (* (pow t 2) (* (pow (sqrt -1) 2) (sqrt 1/2)))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt 1/2) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/8 (* (/ (pow l 2) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (sqrt 1/2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/8 (* (/ 1 (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (* t (sqrt 2)))) (* t (sqrt 2))) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* t (sqrt 2)) (* (pow l 2) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (pow (sqrt 2) 3)))) (* 1/2 (/ 1 (* t (sqrt 2))))))) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* t (sqrt 2)) (* (pow l 2) (+ (* (pow l 2) (- (* 1/16 (/ (pow l 2) (* (pow t 5) (pow (sqrt 2) 5)))) (* 1/8 (/ 1 (* (pow t 3) (pow (sqrt 2) 3)))))) (* 1/2 (/ 1 (* t (sqrt 2))))))) l)))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow l 2))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow t 4) (pow l 4))) (/ (pow t 2) (pow l 2))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow t 4) (pow l 4))) (+ (* 1/2 (/ (pow t 6) (pow l 6))) (/ (pow t 2) (pow l 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* (pow l 3) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1 (* (/ (sqrt 1/2) (* (pow l 2) t)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* -1/8 (/ (pow Om 2) (pow Omc 4))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* (pow Om 2) (- (* -1/16 (/ (pow Om 2) (pow Omc 6))) (* 1/8 (/ 1 (pow Omc 4))))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 1))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (+ 1 (* -1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (* Om Om) (* Omc Omc)) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (/ (* l (sqrt 1/2)) t)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (* (pow Omc 2) t))) (/ (* l (sqrt 1/2)) t))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (* l (sqrt 1/2)) (* (pow Omc 2) t))) (* -1/8 (/ (* (pow Om 2) (* l (sqrt 1/2))) (* (pow Omc 4) t))))) (/ (* l (sqrt 1/2)) t))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (* l (sqrt 1/2)) (* (pow Omc 2) t))) (* (pow Om 2) (+ (* -1/8 (/ (* l (sqrt 1/2)) (* (pow Omc 4) t))) (* -1/16 (/ (* (pow Om 2) (* l (sqrt 1/2))) (* (pow Omc 6) t))))))) (/ (* l (sqrt 1/2)) t))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* l (sqrt 1/2))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (pow Omc 2))) (* l (sqrt 1/2)))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (+ (* l (sqrt 1/2)) (* (pow Om 2) (+ (* -1/2 (/ (* l (sqrt 1/2)) (pow Omc 2))) (* -1/8 (/ (* (pow Om 2) (* l (sqrt 1/2))) (pow Omc 4))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (+ (* l (sqrt 1/2)) (* (pow Om 2) (+ (* -1/2 (/ (* l (sqrt 1/2)) (pow Omc 2))) (* (pow Om 2) (+ (* -1/8 (/ (* l (sqrt 1/2)) (pow Omc 4))) (* -1/16 (/ (* (pow Om 2) (* l (sqrt 1/2))) (pow Omc 6))))))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (pow Omc 2))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (sqrt 1/2) (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (pow Omc 2))) (* -1/8 (/ (* (pow Om 2) (sqrt 1/2)) (pow Omc 4))))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (sqrt 1/2) (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (pow Omc 2))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (pow Omc 4))) (* -1/16 (/ (* (pow Om 2) (sqrt 1/2)) (pow Omc 6))))))))))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1/2))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1/2 (* -1/2 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2)))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (+ (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (* (pow Om 2) (+ (* l (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (+ (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))) (* (pow Om 2) (* l (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) t))) (* 1/128 (/ (pow l 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2)))))))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (/ (sqrt 1/2) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (+ (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))))) (/ (sqrt 1/2) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) t))) (+ (* 1/16 (/ (pow l 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) t))) (+ (* 1/64 (/ (pow l 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) t))) (* 1/128 (/ (pow l 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))))))))))) (/ (sqrt 1/2) t)))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow Om 2) (* (pow l 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2)))))))) (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* (pow Om 2) (* (pow l 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) (* (pow l 2) t)))) (* 1/64 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))) (* (pow l 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))))) (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow Om 2) (+ (* (pow Om 2) (+ (* (pow Om 2) (* (pow l 2) (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) (* (pow l 2) t)))) (* 1/128 (/ 1 (* (pow Omc 6) (* (pow t 3) (sqrt 1/2)))))))) (* (pow l 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) (* (pow l 2) t)))) (* 1/64 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))))) (* (pow l 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))))) (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (/ (sqrt 1/2) (* (pow l 2) t))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) (* (pow l 2) t)))) (* 1/64 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2)))))))))) (/ (sqrt 1/2) (* (pow l 2) t))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) (* (pow l 2) t)))) (+ (* 1/64 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* (pow Om 2) (+ (* -1/16 (/ (sqrt 1/2) (* (pow Omc 6) (* (pow l 2) t)))) (* 1/128 (/ 1 (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))))))))))) (/ (sqrt 1/2) (* (pow l 2) t))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (/ (sqrt 1/2) (* (pow l 2) t))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (/ (sqrt 1/2) (* (pow l 2) t)))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* -1/8 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 4) (* (pow l 2) t)))))) (/ (sqrt 1/2) (* (pow l 2) t)))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (+ (* (pow Om 2) (+ (* -1/2 (/ (sqrt 1/2) (* (pow Omc 2) (* (pow l 2) t)))) (* (pow Om 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Omc 4) (* (pow l 2) t)))) (* -1/16 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 6) (* (pow l 2) t)))))))) (/ (sqrt 1/2) (* (pow l 2) t)))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ -1/8 (* (pow t 3) (sqrt 1/2)))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (- (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (- (* (pow Om 2) (+ (* 1/64 (/ (pow Om 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (- (* (pow Om 2) (+ (* (pow Om 2) (+ (* 1/128 (/ (pow Om 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (* 1/64 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))) (* 1/16 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ 1 (* (pow t 3) (sqrt 1/2)))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ 1 (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (- (* -1/8 (/ (pow Om 2) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/2 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (/ 1 (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* (pow Om 2) (- (* (pow Om 2) (- (* -1/16 (/ (pow Om 2) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (* 1/8 (/ 1 (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))))) (* 1/2 (/ 1 (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (/ 1 (* (pow t 3) (sqrt 1/2))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (* Om (sqrt -1)) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (pow Om 2)) (/ 1 (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) (* Omc t))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t)))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/16 (/ (* (pow Omc 5) (* l (sqrt 1/2))) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) Omc)))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc)))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (* (pow Omc 5) (* l (sqrt 1/2))) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (* Om (* (sqrt -1) (sqrt 1/2))) Omc)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc)))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc)))))))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1/2 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* (pow Om 2) (- (* 1/2 (/ 1 (pow Om 2))) (* 1/2 (/ 1 (pow Omc 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)) (/ (* l (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* t (pow (sqrt -1) 5)))))) (pow Om 6))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* Om (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (+ (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow Omc 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (+ (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow Omc 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2)) (/ (* (pow l 2) (+ (* -1/128 (/ (pow Omc 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 5))))))) (pow Om 6))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* Omc (* (pow l 2) t)))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1/8 (/ (* Om (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (* Om (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (* Om (sqrt -1)) Omc))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* -1 (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) (* Omc t)))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t)))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* 1/16 (/ (* (pow Omc 5) (* l (sqrt 1/2))) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (* t (sqrt -1))))) (/ (* l (* (sqrt -1) (sqrt 1/2))) (* Omc t)))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) Omc))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc)))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (* l (sqrt 1/2))) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (* (pow Omc 5) (* l (sqrt 1/2))) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ (* Omc (* l (sqrt 1/2))) (* (pow Om 2) (sqrt -1)))) (/ (* l (* (sqrt -1) (sqrt 1/2))) Omc))))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (/ (* Om (* (sqrt -1) (sqrt 1/2))) Omc))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (sqrt -1)))) (/ (* (sqrt -1) (sqrt 1/2)) Omc))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (* -1 (* Om (+ (* l (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))) (+ (/ (* l (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* t (pow (sqrt -1) 3)))) (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* l (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* t (sqrt -1)))))) (pow Om 2)) (/ (* l (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* t (pow (sqrt -1) 5)))))) (pow Om 6)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* t (pow (sqrt -1) 3))))) (+ (* -1/8 (/ (* (pow l 2) (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (* Omc (pow l 2)) (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (* (pow Omc 5) (pow l 2)) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (* (pow Omc 3) (pow l 2)) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* t (pow (sqrt -1) 5))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* t (sqrt -1))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc t)))))))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1 (* Om (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (+ (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow Omc 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (* -1 (* Om (+ (* (pow l 2) (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))) (+ (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow Omc 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))) (pow Om 4)) (+ (/ (* (pow l 2) (+ (* -1/16 (/ Omc (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))) (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow l 2) (* t (sqrt -1))))))) (pow Om 2)) (/ (* (pow l 2) (+ (* -1/128 (/ (pow Omc 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))) (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow l 2) (* t (pow (sqrt -1) 5))))))) (pow Om 6)))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* -1 (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* Omc (* (pow l 2) t))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t)))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (* (pow Omc 3) (sqrt 1/2)) (* (pow Om 4) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* 1/16 (/ (* (pow Omc 5) (sqrt 1/2)) (* (pow Om 6) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (+ (* 1/2 (/ (* Omc (sqrt 1/2)) (* (pow Om 2) (* (pow l 2) (* t (sqrt -1)))))) (/ (* (sqrt -1) (sqrt 1/2)) (* Omc (* (pow l 2) t))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* 1/8 (/ (* Om (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* -1/128 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (/ (* Om (sqrt -1)) (* Omc (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2)))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2))))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (+ (* 1/2 (/ Omc (* (pow Om 2) (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (sqrt -1) (* Omc (* (pow t 3) (sqrt 1/2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow Omc 2) (* Om (sqrt -1)))) (* Om (sqrt -1))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* -1/8 (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* (pow Omc 2) (- (* 1/16 (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5)))) (* 1/8 (/ 1 (* (pow Om 3) (pow (sqrt -1) 3)))))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (/ (- (pow Omc 2) (pow Om 2)) (pow Omc 2))))
#s(approx Omc #s(hole binary64 Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* Om (* t (sqrt -1))))) (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) t)) Omc)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/2 (/ (* l (sqrt 1/2)) (* Om (* t (sqrt -1))))))) (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) t)) Omc)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* 1/2 (/ (* l (sqrt 1/2)) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (* l (sqrt 1/2)) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/16 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))) (/ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) t)) Omc)))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* Om (sqrt -1)))) (* Om (* l (* (sqrt -1) (sqrt 1/2))))) Omc)))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (* l (sqrt 1/2)) (* Om (sqrt -1))))))) Omc)))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* Om (* l (* (sqrt -1) (sqrt 1/2)))) (* (pow Omc 2) (+ (* 1/2 (/ (* l (sqrt 1/2)) (* Om (sqrt -1)))) (* (pow Omc 2) (+ (* -1/8 (/ (* l (sqrt 1/2)) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/16 (/ (* (pow Omc 2) (* l (sqrt 1/2))) (* (pow Om 5) (pow (sqrt -1) 5))))))))) Omc)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (sqrt 1/2)) (* Om (sqrt -1)))) (* Om (* (sqrt -1) (sqrt 1/2)))) Omc)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (sqrt 1/2) (* Om (sqrt -1))))))) Omc)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow Omc 2) (+ (* 1/2 (/ (sqrt 1/2) (* Om (sqrt -1)))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/16 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 5) (pow (sqrt -1) 5))))))))) Omc)))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* -1/2 (pow Om 2)) (* 1/2 (pow Omc 2))) (pow Omc 2))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (+ (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (* (pow Omc 2) (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))))) Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (/ (+ (* l (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) (* (pow Omc 2) (+ (* l (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (* (pow Omc 2) (+ (* l (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))) (* (pow Omc 2) (* l (+ (* -1/128 (/ (pow l 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))))))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t)) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (* (pow l 2) (sqrt -1))) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (+ (* -1/16 (/ (pow l 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* t (sqrt -1))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* t (pow (sqrt -1) 3))))) (+ (* 1/64 (/ (pow l 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* (pow Omc 2) (+ (* -1/128 (/ (pow l 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* t (pow (sqrt -1) 5))))))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) t))) Omc)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (* (pow l 2) (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t)))) Omc)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (* (pow l 2) (- (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))))) (* (pow l 2) (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))))) Omc)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* (pow Omc 2) (* (pow l 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (* 1/64 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))) (* (pow l 2) (- (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))))) (* (pow l 2) (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))))) Omc)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* (pow Omc 2) (+ (* (pow Omc 2) (* (pow l 2) (- (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (* 1/128 (/ 1 (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2))))))))) (* (pow l 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (* 1/64 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))))) (* (pow l 2) (- (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))))) (* (pow l 2) (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))))) Omc)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))) Omc)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (- (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t)))) Omc)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (- (+ (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (* 1/64 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2))))))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t)))) Omc)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (+ (* (pow Omc 2) (- (+ (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (+ (* 1/64 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* (pow Omc 2) (- (* 1/16 (/ (sqrt 1/2) (* (pow Om 5) (* (pow l 2) (* t (pow (sqrt -1) 5)))))) (* 1/128 (/ 1 (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))))))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t)))) Omc)))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow Omc 2) (sqrt 1/2)) (* Om (* (pow l 2) (* t (sqrt -1)))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))) Omc)))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* -1/8 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))) Omc)))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* 1/2 (/ (sqrt 1/2) (* Om (* (pow l 2) (* t (sqrt -1)))))) (* (pow Omc 2) (+ (* -1/8 (/ (sqrt 1/2) (* (pow Om 3) (* (pow l 2) (* t (pow (sqrt -1) 3)))))) (* 1/16 (/ (* (pow Omc 2) (sqrt 1/2)) (* (pow Om 5) (* (pow l 2) (* t (pow (sqrt -1) 5)))))))))) (/ (* Om (* (sqrt -1) (sqrt 1/2))) (* (pow l 2) t))) Omc)))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (* -1/16 (/ (pow Omc 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))) Omc)))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (* (pow Omc 2) (- (* 1/64 (/ (pow Omc 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))))) Omc)))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) (* (pow Omc 2) (- (* (pow Omc 2) (+ (* -1/128 (/ (pow Omc 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/64 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))) (* 1/16 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2))))))))) Omc)))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow Omc 2) (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))) (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* -1/8 (/ (pow Omc 2) (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))) (* 1/2 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (/ (+ (* (pow Omc 2) (+ (* (pow Omc 2) (- (* 1/16 (/ (pow Omc 2) (* (pow Om 5) (* (pow t 3) (* (pow (sqrt -1) 5) (sqrt 1/2)))))) (* 1/8 (/ 1 (* (pow Om 3) (* (pow t 3) (* (pow (sqrt -1) 3) (sqrt 1/2)))))))) (* 1/2 (/ 1 (* Om (* (pow t 3) (* (sqrt -1) (sqrt 1/2)))))))) (/ (* Om (sqrt -1)) (* (pow t 3) (sqrt 1/2)))) Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (* -1/8 (/ (pow Om 4) (pow Omc 4)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (+ (* -1/8 (/ (pow Om 4) (pow Omc 4))) (* -1/16 (/ (pow Om 6) (pow Omc 6))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (* l (sqrt 1/2))) (* (pow Omc 4) t))) (/ (* l (sqrt 1/2)) t)))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (* l (sqrt 1/2))) (* (pow Omc 4) t))) (+ (* -1/16 (/ (* (pow Om 6) (* l (sqrt 1/2))) (* (pow Omc 6) t))) (/ (* l (sqrt 1/2)) t))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (pow Omc 2))) (+ (* -1/8 (/ (* (pow Om 4) (* l (sqrt 1/2))) (pow Omc 4))) (* l (sqrt 1/2))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (* l (sqrt 1/2))) (pow Omc 2))) (+ (* -1/8 (/ (* (pow Om 4) (* l (sqrt 1/2))) (pow Omc 4))) (+ (* -1/16 (/ (* (pow Om 6) (* l (sqrt 1/2))) (pow Omc 6))) (* l (sqrt 1/2)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (pow Omc 2))) (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (pow Omc 4)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (pow Omc 2))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (pow Omc 4))) (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (pow Omc 6))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (+ (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (/ (* l (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) t)) (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) #s(hole binary64 (+ (* l (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (/ (sqrt 1/2) t))) (+ (/ (* l (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) t)) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (+ (/ (* l (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) t)) (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4)) (/ (* l (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) t)) (* 1/128 (/ (* (pow Om 6) (pow l 2)) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 6)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) t))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) t))) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow Omc 6) t))) (+ (* 1/128 (/ (* (pow Om 6) (pow l 2)) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/64 (/ (* (pow Om 4) (pow l 2)) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) t))))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))) (/ (* (pow l 2) (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) t))) (* 1/16 (/ (pow Om 2) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))) (+ (/ (* (pow l 2) (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) t))) (* 1/16 (/ (pow Om 2) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow l 2) t))) (* 1/64 (/ (pow Om 4) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) #s(hole binary64 (+ (* (pow l 2) (- (/ (sqrt 1/2) (* (pow l 2) t)) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))) (+ (/ (* (pow l 2) (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) t))) (* 1/16 (/ (pow Om 2) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 2)) (+ (/ (* (pow l 2) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow l 2) t))) (* 1/64 (/ (pow Om 4) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 4)) (/ (* (pow l 2) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow l 2) t))) (* 1/128 (/ (pow Om 6) (* (pow t 3) (sqrt 1/2)))))) (pow Omc 6)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) (* (pow l 2) t)))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) (* (pow l 2) t)))) (+ (* 1/64 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) (* (pow l 2) t)))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) (* (pow l 2) t)))) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow Omc 6) (* (pow l 2) t)))) (+ (* 1/128 (/ (pow Om 6) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/64 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (/ (sqrt 1/2) (* (pow l 2) t)))))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) (* (pow l 2) t)))) (/ (sqrt 1/2) (* (pow l 2) t))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow Omc 2) (* (pow l 2) t)))) (+ (* -1/8 (/ (* (pow Om 4) (sqrt 1/2)) (* (pow Omc 4) (* (pow l 2) t)))) (+ (* -1/16 (/ (* (pow Om 6) (sqrt 1/2)) (* (pow Omc 6) (* (pow l 2) t)))) (/ (sqrt 1/2) (* (pow l 2) t)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (- (+ (* 1/64 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2)))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) #s(hole binary64 (- (+ (* 1/128 (/ (pow Om 6) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (+ (* 1/64 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (* 1/16 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))))) (* 1/8 (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (/ 1 (* (pow t 3) (sqrt 1/2)))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) #s(hole binary64 (+ (* -1/2 (/ (pow Om 2) (* (pow Omc 2) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/8 (/ (pow Om 4) (* (pow Omc 4) (* (pow t 3) (sqrt 1/2))))) (+ (* -1/16 (/ (pow Om 6) (* (pow Omc 6) (* (pow t 3) (sqrt 1/2))))) (/ 1 (* (pow t 3) (sqrt 1/2))))))))

Outputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(pow.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc)) (.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))
#s(literal 1 binary64)
(*.f64 (pow.f64 (/.f64 Om Omc) #s(literal 1 binary64)) (pow.f64 (/.f64 Om Omc) #s(literal 1 binary64)))
(*.f64 (/.f64 Om Omc) (/.f64 Om Omc))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) (neg.f64 Omc))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) (fabs.f64 Omc))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) Omc)
(ratio-of-squares.f64 (neg.f64 Om) (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 Om) (neg.f64 Omc))
(ratio-of-squares.f64 (neg.f64 Om) (fabs.f64 Omc))
(ratio-of-squares.f64 (neg.f64 Om) Omc)
(ratio-of-squares.f64 (fabs.f64 Om) (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 Om) (neg.f64 Omc))
(ratio-of-squares.f64 (fabs.f64 Om) (fabs.f64 Omc))
(ratio-of-squares.f64 (fabs.f64 Om) Omc)
(ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 Om (neg.f64 Omc))
(ratio-of-squares.f64 Om (fabs.f64 Omc))
(ratio-of-squares.f64 Om Omc)
(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 Om Om)) (neg.f64 (.f64 Omc Omc)))
(/.f64 (.f64 Om Om) (.f64 Omc Omc))
(exp.f64 (*.f64 (log.f64 (/.f64 Om Omc)) #s(literal 2 binary64)))
Om
Omc
(pow.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))
(*.f64 (pow.f64 (/.f64 t l) #s(literal 1 binary64)) (pow.f64 (/.f64 t l) #s(literal 1 binary64)))
(*.f64 (/.f64 t l) (/.f64 t l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) (neg.f64 l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) (fabs.f64 l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) l)
(ratio-of-squares.f64 (neg.f64 t) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 t) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 t) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 t) l)
(ratio-of-squares.f64 (fabs.f64 t) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 t) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 t) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 t) l)
(ratio-of-squares.f64 t (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 t (neg.f64 l))
(ratio-of-squares.f64 t (fabs.f64 l))
(ratio-of-squares.f64 t l)
(pow.f64 (/.f64 t l) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 t t)) (neg.f64 (.f64 l l)))
(/.f64 (.f64 t t) (.f64 l l))
(exp.f64 (*.f64 (log.f64 (/.f64 t l)) #s(literal 2 binary64)))
t
l
#s(literal 2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))))))
(pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(pow.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))) (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
(/.f64 (neg.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (neg.f64 t))
(/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)
(.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
#s(literal 1/2 binary64)
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l)))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l))
(.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l)
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))
(.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) (-.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t))) (-.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))))
(+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
(/.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (neg.f64 (.f64 (*.f64 l l) t)))
(/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (*.f64 l l) t))
(.f64 (.f64 l l) t)
(.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(literal -1/8 binary64)
(*.f64 (/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (neg.f64 (pow.f64 t #s(literal -3 binary64))) (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))))
(/.f64 (pow.f64 t #s(literal -3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 t #s(literal 3 binary64)) #s(literal -1 binary64))
(pow.f64 t #s(literal -3 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 t #s(literal 3 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64)))
(*.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(.f64 (.f64 t t) t)
(*.f64 (pow.f64 t #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64)))
(.f64 t (.f64 t t))
(pow.f64 (*.f64 t t) #s(literal 3/2 binary64))
(pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 t #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))
#s(literal 3 binary64)
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 1/2 binary64))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))
#s(approx (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1 binary64) (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 t t) (-.f64 (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) (pow.f64 l #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) (pow.f64 l #s(literal -4 binary64)))) (.f64 l l))) (.f64 #s(literal 8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (-.f64 (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) (pow.f64 l #s(literal -4 binary64))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(literal 1 binary64))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 t l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 t (.f64 l l))) (pow.f64 l #s(literal -2 binary64))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 t t) (+.f64 (.f64 (.f64 t t) (-.f64 (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 t (pow.f64 l #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 l #s(literal -4 binary64))))) (pow.f64 l #s(literal -2 binary64))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(literal 1 binary64))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))
#s(approx (* (/ (* t t) (* l l)) 2) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))
#s(approx (/ (* t t) (* l l)) (ratio-of-squares.f64 t l))
#s(approx t t)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1 binary64) (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 t t) (-.f64 (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) (pow.f64 l #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) (pow.f64 l #s(literal -4 binary64)))) (.f64 l l))) (.f64 #s(literal 8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (-.f64 (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) (pow.f64 l #s(literal -4 binary64))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 t t) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (*.f64 l l)))))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 t t) (-.f64 (.f64 (.f64 t t) (-.f64 (.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 6 binary64)))) (.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 l l)))))) (ratio-of-squares.f64 Om Omc)))
#s(approx (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1 binary64) (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 t t) (-.f64 (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) (pow.f64 l #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal -2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) (pow.f64 l #s(literal -4 binary64)))) (.f64 l l))) (.f64 #s(literal 8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (-.f64 (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) (pow.f64 l #s(literal -4 binary64))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 t t) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (*.f64 l l)))))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 t t) (-.f64 (.f64 (.f64 t t) (-.f64 (.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 6 binary64)))) (.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 l l)))))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (.f64 (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 l l)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (*.f64 l l) t)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (* (* l l) t) (.f64 (.f64 l l) t))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (/ 1 (pow t 3)) (sqrt 1/2)) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))
#s(approx (/ 1 (pow t 3)) (pow.f64 t #s(literal -3 binary64)))
#s(approx (pow t 3) (pow.f64 t #s(literal 3 binary64)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 t (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 l (.f64 (.f64 t t) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) l))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 t (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 l (.f64 (.f64 t t) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) l)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 t (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 5 binary64)) (.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 l (.f64 (.f64 t t) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) l))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (.f64 (.f64 t t) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 l #s(literal -2 binary64))) (pow.f64 t #s(literal -2 binary64)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (*.f64 t t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t))))) (*.f64 t t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (*.f64 t t)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (-.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t))))) (*.f64 t t)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (*.f64 l l) t)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 l l)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 t (sqrt.f64 #s(literal 2 binary64))) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 #s(literal -1 binary64) (.f64 t (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 l (.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) l)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 #s(literal -1 binary64) (.f64 t (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 l (.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) l))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 #s(literal -1 binary64) (.f64 t (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 5 binary64)) (.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 l (.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) l)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))) (.f64 l (.f64 (pow.f64 t #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))) t)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (.f64 t t) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t)))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t)))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 l l)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (.f64 (.f64 t t) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 l (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 t (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/64 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 l (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 t (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/64 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 t (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 8 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/64 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (.f64 (*.f64 t t) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal 2 binary64))))) (.f64 t (sqrt.f64 #s(literal 2 binary64)))) l))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (+.f64 (.f64 t (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (pow.f64 (.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))))) l))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (+.f64 (.f64 t (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 l l) (+.f64 (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 l l) (pow.f64 (.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (pow.f64 (.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))))) l))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (/.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 t t)) (.f64 l l)) (.f64 l l)))
#s(approx l l)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 l (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 t (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/64 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 l (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 t (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/64 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 t (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 8 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/64 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (.f64 (*.f64 t t) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (*.f64 t t))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 t t))) (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 4 binary64)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 t t))) (.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (-.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 8 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 4 binary64)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 l (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 t (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/64 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 l (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 t (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/64 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 t (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 8 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/64 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (.f64 (*.f64 t t) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (*.f64 t t))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 t t))) (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 4 binary64)))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 t t))) (.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (-.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 8 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 4 binary64)))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (* l l) (*.f64 l l))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 l l)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 t #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (pow.f64 l #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 (.f64 t t) (*.f64 l l))) (ratio-of-squares.f64 t l))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 (.f64 t t) (.f64 l l))) (+.f64 (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (ratio-of-squares.f64 t l)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 t #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (pow.f64 l #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l))) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 t #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l))) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (ratio-of-squares.f64 t l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 t #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 t t) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (pow.f64 l #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l))) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 t #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l))) (ratio-of-squares.f64 Om Omc)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 (pow.f64 l #s(literal 3 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (*.f64 l l) t)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 Omc #s(literal -2 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 Omc #s(literal -2 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 Omc #s(literal -4 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 Om Om) (-.f64 (.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 Om (.f64 Omc Omc))) (*.f64 #s(literal 1/2 binary64) (pow.f64 Omc #s(literal -2 binary64)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 Om Om) (-.f64 (.f64 (.f64 Om Om) (-.f64 (.f64 #s(literal -1/16 binary64) (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 Omc #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 Omc #s(literal -2 binary64)))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (* Om Om) (* Omc Omc)) (ratio-of-squares.f64 Om Omc))
#s(approx Om Om)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 Omc #s(literal -2 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 Omc #s(literal -2 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 Omc #s(literal -4 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 Omc #s(literal -2 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 Omc #s(literal -2 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 Omc #s(literal -4 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (/.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 l (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t))))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 l (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 l (pow.f64 Omc #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t))))))) (/.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t)))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Omc Omc))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (+.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Omc Omc))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 Omc #s(literal 4 binary64))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (+.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Omc Omc))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 Omc #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 Omc #s(literal 6 binary64))))))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Omc Omc)))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Omc Omc))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 Omc #s(literal 4 binary64))))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Omc Omc))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 Omc #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 Omc #s(literal 6 binary64))))))))))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 (.f64 Om Om) (.f64 l (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) t))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Omc Omc) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 (.f64 Om Om) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) t))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 (.f64 Om Om) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) t))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 (.f64 Om Om) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) t))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 (.f64 Om Om) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) t))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 (.f64 Om Om) (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 6 binary64)) t))) (.f64 #s(literal 1/128 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Omc #s(literal 6 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) t))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Omc Omc) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) t))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) t))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) t))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) t))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 6 binary64)) t))) (.f64 #s(literal 1/128 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Omc #s(literal 6 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 (.f64 l l) (-.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (+.f64 (.f64 (.f64 Om Om) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) t)))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))) (.f64 (.f64 l l) (-.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 Om Om) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (.f64 l l) t)))) (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) t)))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))) (.f64 (.f64 l l) (-.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 Om Om) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 6 binary64)) (.f64 (.f64 l l) t)))) (.f64 #s(literal 1/128 binary64) (pow.f64 (.f64 (pow.f64 Omc #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (.f64 l l) t)))) (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) t)))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))) (.f64 (.f64 l l) (-.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (-.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (-.f64 (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) t)))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t))) (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (-.f64 (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (.f64 l l) t)))) (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (-.f64 (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 6 binary64)) (.f64 (.f64 l l) t)))) (.f64 #s(literal 1/128 binary64) (pow.f64 (.f64 (pow.f64 Omc #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t))) (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) t)))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) t)))) (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (.f64 l l) t)))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (*.f64 l l) t))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (/.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (-.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 Om Om) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (-.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 (.f64 Om Om) (+.f64 (.f64 #s(literal 1/128 binary64) (/.f64 (.f64 Om Om) (.f64 (pow.f64 Omc #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 (.f64 Om Om) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om Om) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 (.f64 Om Om) (-.f64 (.f64 (.f64 Om Om) (-.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (pow.f64 Omc #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (*.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))))))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (*.f64 #s(literal -1 binary64) (ratio-of-squares.f64 Om Omc)))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (.f64 (.f64 Om Om) (-.f64 (pow.f64 Om #s(literal -2 binary64)) (pow.f64 Omc #s(literal -2 binary64)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 Om Om) (-.f64 (pow.f64 (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1 binary64)) (pow.f64 (.f64 (.f64 Omc Omc) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1 binary64)))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 Om Om) (-.f64 (pow.f64 (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1 binary64)) (pow.f64 (.f64 (.f64 Omc Omc) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1 binary64)))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (.f64 (/.f64 Om Omc) (/.f64 (.f64 l (sqrt.f64 #s(literal -1/2 binary64))) t)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (.f64 (/.f64 l Omc) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t)))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 l Omc) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 l Omc) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t)))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (/.f64 (.f64 Om (.f64 l (sqrt.f64 #s(literal -1/2 binary64)))) Omc))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 l (sqrt.f64 #s(literal -1/2 binary64))) Omc))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 l (sqrt.f64 #s(literal -1/2 binary64))) Omc)))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 l (sqrt.f64 #s(literal -1/2 binary64))) Omc))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (*.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) Omc))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc)))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc))))))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) (*.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 (.f64 Om Om) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 Om #s(literal -2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 Om (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (*.f64 Omc t))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 Om (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t)))) (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 Om Om)))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 Om (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t)))) (+.f64 (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 Om Om))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 Om (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t)))) (+.f64 (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 Om Om)) (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 5 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (*.f64 Omc t)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (*.f64 Omc t)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (*.f64 Omc t)))))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 Om (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (*.f64 l l) t)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 Om (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 Om Om)))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 Om (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))) (+.f64 (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 Om Om))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 Om (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))) (+.f64 (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (*.f64 l l) t))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (*.f64 l l) t))))))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) (.f64 Omc (.f64 (.f64 l l) t))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (*.f64 l l) t))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (*.f64 l l) t)))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 (/.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Omc (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (.f64 #s(literal -1 binary64) (.f64 (/.f64 Om Omc) (/.f64 (*.f64 l (sqrt.f64 #s(literal -1/2 binary64))) t))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 l Omc) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (.f64 (/.f64 l Omc) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t)))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (.f64 (/.f64 l Omc) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 Om (*.f64 l (sqrt.f64 #s(literal -1/2 binary64)))) Omc)))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 l (sqrt.f64 #s(literal -1/2 binary64))) Omc)))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 l (sqrt.f64 #s(literal -1/2 binary64))) Omc))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 l (sqrt.f64 #s(literal -1/2 binary64))) Omc)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) Omc)))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc)))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) Omc)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 #s(literal -1 binary64) (.f64 Om (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t)))) (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 Om Om))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t)))) (+.f64 (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 Om Om)))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t)))) (+.f64 (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 Om Om)) (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (pow.f64 Omc #s(literal 5 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))))) (pow.f64 Om #s(literal 6 binary64)))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (*.f64 Omc t))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t))))))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc (.f64 l l)) (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc t))))))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 #s(literal -1 binary64) (.f64 Om (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))) (.f64 Om Om))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))) (+.f64 (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))) (.f64 Om Om)))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))) (+.f64 (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (*.f64 l l) t)))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (*.f64 l l) t)))))))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t)))))))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) (.f64 Omc (.f64 (*.f64 l l) t)))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t)))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (.f64 l l) t))))))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 3/2 binary64)) (.f64 Om Om)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Omc #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (.f64 Omc (.f64 (*.f64 l l) t)))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (.f64 #s(literal -1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Omc #s(literal 3 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Omc #s(literal 5 binary64)) (.f64 (pow.f64 Om #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Omc (.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Omc (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 Omc Omc) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) Omc))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 Omc Omc) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))) Omc))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)) #s(literal -1 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 Omc Omc) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc Omc) (.f64 Om (sqrt.f64 #s(literal -1 binary64))))) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Omc Omc) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)))))) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Omc Omc) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)))))) Omc))
#s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (-.f64 (ratio-of-squares.f64 Omc Omc) (ratio-of-squares.f64 Om Omc)))
#s(approx Omc Omc)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 Omc Omc) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 Omc Omc) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)) #s(literal -1 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 Omc Omc) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))) Omc))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (/.f64 (.f64 Omc Omc) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 Omc Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 Omc Omc) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) Omc))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 Omc Omc) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))) Omc))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)) #s(literal -1 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 Omc Omc) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))) Omc))
#s(approx (/ (- 1 (/ (* Om Om) (* Omc Omc))) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (/.f64 (.f64 Omc Omc) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))) (.f64 Omc Omc)))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 Omc Omc) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (.f64 Om (.f64 l (sqrt.f64 #s(literal -1/2 binary64)))) t)) Omc))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (.f64 Om (.f64 l (sqrt.f64 #s(literal -1/2 binary64)))) t)) Omc))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))) (/.f64 (.f64 Om (.f64 l (sqrt.f64 #s(literal -1/2 binary64)))) t)) Omc))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 Omc Omc) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Om (sqrt.f64 #s(literal -1 binary64))))) (.f64 Om (*.f64 l (sqrt.f64 #s(literal -1/2 binary64))))) Omc))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (/.f64 (+.f64 (.f64 Om (.f64 l (sqrt.f64 #s(literal -1/2 binary64)))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (sqrt.f64 #s(literal -1 binary64)))))))) Omc))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (/.f64 (+.f64 (.f64 Om (.f64 l (sqrt.f64 #s(literal -1/2 binary64)))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (sqrt.f64 #s(literal -1 binary64))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (/.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))) Omc))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 Omc Omc) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (sqrt.f64 #s(literal -1 binary64))))) (*.f64 Om (sqrt.f64 #s(literal -1/2 binary64)))) Omc))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (sqrt.f64 #s(literal -1 binary64)))))))) Omc))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (sqrt.f64 #s(literal -1 binary64))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/16 binary64) (*.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))) Omc))
#s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 Om Om)) (.f64 #s(literal 1/2 binary64) (.f64 Omc Omc))) (*.f64 Omc Omc)))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t))) Omc))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t))) (.f64 (.f64 Omc Omc) (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 l l) (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))))) Omc))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 l l) (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))) (.f64 (.f64 Omc Omc) (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))))))) Omc))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 l l) (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (.f64 (.f64 Omc Omc) (.f64 l (+.f64 (.f64 #s(literal -1/128 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Om #s(literal 5 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 5 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))))))) Omc))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t)) Omc))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 l l) (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t))) Omc))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 l l) (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t))) Omc))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 Om (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 l l) (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 t (sqrt.f64 #s(literal -1 binary64)))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/128 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 Om #s(literal 5 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 5 binary64)) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1/2 binary64))) t))) Omc))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (/.f64 Om (*.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t)))) Omc))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))) #s(literal -1 binary64)))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (/.f64 Om (*.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))))) Omc))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1 binary64)))))) (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))) #s(literal -1 binary64))))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (/.f64 Om (.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))))) Omc))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 5 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))))) (.f64 #s(literal 1/128 binary64) (pow.f64 (.f64 (pow.f64 Om #s(literal 5 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1 binary64)))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1 binary64))))))) (.f64 (.f64 l l) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))) #s(literal -1 binary64))))))) (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (/.f64 Om (*.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))))) Omc))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (/.f64 Om (*.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))) Omc))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 (.f64 Omc Omc) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))) #s(literal -1 binary64))))) (.f64 (/.f64 Om (*.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t)))) Omc))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 (.f64 Omc Omc) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1 binary64)))))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))) #s(literal -1 binary64))))) (.f64 (/.f64 Om (.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t)))) Omc))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 (.f64 Omc Omc) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (+.f64 (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1 binary64))) (.f64 (.f64 Omc Omc) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 5 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))))) (.f64 #s(literal 1/128 binary64) (pow.f64 (.f64 (pow.f64 Om #s(literal 5 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1 binary64))))))))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))) #s(literal -1 binary64))))) (.f64 (/.f64 Om (*.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t)))) Omc))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 Omc Omc) Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 (/.f64 Om (.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))) Omc))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))))) (.f64 (/.f64 Om (.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))) Omc))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (.f64 (.f64 l l) (.f64 t (sqrt.f64 #s(literal -1 binary64))))))) (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) (.f64 t (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))))))))) (.f64 (/.f64 Om (*.f64 l l)) (/.f64 (sqrt.f64 #s(literal -1/2 binary64)) t))) Omc))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Omc Omc) (.f64 Om (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))))) Omc))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 Omc Omc) (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 Omc Omc) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 Om (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))) #s(literal -1 binary64)))))) Omc))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 Omc Omc) (-.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/128 binary64) (/.f64 (.f64 Omc Omc) (.f64 (pow.f64 Om #s(literal 5 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1 binary64))))) (.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 Om (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))) #s(literal -1 binary64)))))) Omc))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Omc Omc) (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) Omc))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Omc Omc) (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))) #s(literal -1 binary64))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) Omc))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (/.f64 (+.f64 (.f64 (.f64 Omc Omc) (+.f64 (.f64 (.f64 Omc Omc) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Omc Omc) (.f64 (pow.f64 Om #s(literal 5 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 Om #s(literal 3 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 Om (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal -1/2 binary64)))) #s(literal -1 binary64))))) (/.f64 (.f64 Om (sqrt.f64 #s(literal -1 binary64))) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) Omc))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc))) (*.f64 #s(literal -1/16 binary64) (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))) (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))))))))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t))) (/.f64 (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t))))
#s(approx (/ (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) t) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t))) (/.f64 (.f64 l (sqrt.f64 #s(literal 1/2 binary64))) t)))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Omc Omc))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 Omc #s(literal 4 binary64)))) (*.f64 l (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* l (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Omc Omc))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 Omc #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (pow.f64 Om #s(literal 6 binary64)) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 Omc #s(literal 6 binary64)))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Omc Omc))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 Omc #s(literal 4 binary64)))))))
#s(approx (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Omc Omc))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 Omc #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 Omc #s(literal 6 binary64))))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) t)) (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 Omc Omc))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (+.f64 (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) t)) (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 Omc Omc)) (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) t)) (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))))))) (pow.f64 Omc #s(literal 4 binary64))))))
#s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (+.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (+.f64 (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) t)) (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 Omc Omc)) (+.f64 (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) t)) (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))))))) (pow.f64 Omc #s(literal 4 binary64))) (/.f64 (.f64 l (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) t)) (.f64 #s(literal 1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))))))) (pow.f64 Omc #s(literal 6 binary64)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (.f64 l l) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (.f64 l l) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))))
#s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (+.f64 (.f64 #s(literal 1/128 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (.f64 l l) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (.f64 l l) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t)))))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (+.f64 (.f64 (.f64 l l) (-.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))))) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 Omc Omc))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (+.f64 (.f64 (.f64 l l) (-.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))))) (+.f64 (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 Omc Omc)) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (pow.f64 Omc #s(literal 4 binary64))))))
#s(approx (* (* l l) (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))))) (+.f64 (.f64 (.f64 l l) (-.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))))) (+.f64 (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 Omc Omc)) (+.f64 (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (pow.f64 Omc #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) l) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t))) (.f64 #s(literal 1/128 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (pow.f64 Omc #s(literal 6 binary64)))))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (+ (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))))) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal 1/128 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (.f64 (pow.f64 Omc #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))))))) (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))))
#s(approx (/ (sqrt (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* l l) t)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (ratio-of-squares.f64 Om Omc) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 Omc #s(literal 3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 l l) t))))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (-.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (* -1/8 (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))))) (-.f64 (+.f64 (.f64 #s(literal 1/128 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (.f64 (pow.f64 Omc #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))
#s(approx (* (/ (/ 1 (pow t 3)) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 Omc Omc) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 Omc #s(literal 4 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (.f64 (pow.f64 Omc #s(literal 6 binary64)) (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))))))

eval999.0ms (6.2%)

Memory

49.1MiB live, 1 410.9MiB allocated; 191ms collecting garbage

Samples

566.0ms	11 489×	0	valid
129.0ms	2 847×	0	invalid

Compiler

Compiled 67 241 to 5 079 computations (92.4% saved)

Precisions

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

ival-mult: 225.0ms (58.8% of total)

ival-div: 140.0ms (36.6% of total)

ival-true: 8.0ms (2.1% of total)

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

adjust: 3.0ms (0.8% of total)

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

prune432.0ms (2.7%)

Memory

-66.1MiB live, 718.5MiB allocated; 128ms collecting garbage

Pruning

15 alts after pruning (12 fresh and 3 done)

	Pruned	Kept	Total
New	726	5	731
Fresh	5	7	12
Picked	3	2	5
Done	0	1	1
Total	734	15	749

Accuracy

98.9%

Counts

749 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	70.4%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
▶	50.0%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
✓	50.0%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
	26.3%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)) #s(literal 1/2 binary64)))))
	37.4%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))
▶	37.6%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64)))))
▶	9.9%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
✓	49.6%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
	24.5%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (.f64 (.f64 Om Om) (-.f64 (pow.f64 Om #s(literal -2 binary64)) (pow.f64 Omc #s(literal -2 binary64)))))))) t)))
	50.1%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 #s(approx ( 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t)))
	50.4%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l)))
	49.7%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l)))))
	48.0%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 t (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 l (.f64 (.f64 t t) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) l)))))))
▶	84.2%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
✓	84.3%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))

Samples

300.0ms	6 514×	0	valid
5.0ms	142×	0	invalid

Compiler

Compiled 1 187 to 819 computations (31% saved)

Precisions

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

ival-mult: 104.0ms (67.2% of total)

ival-div: 41.0ms (26.5% of total)

ival-true: 4.0ms (2.6% of total)

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

ival-assert: 2.0ms (1.3% of total)

adjust: 1.0ms (0.6% of total)

series83.0ms (0.5%)

Memory

-16.6MiB live, 173.3MiB allocated; 17ms collecting garbage

Counts

41 → 213

Calls

Call 1

Inputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64))
#s(literal 1 binary64)
(sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))
(ratio-of-squares.f64 t l)
t
l
#s(literal 2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))
(neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))
(ratio-of-squares.f64 Om Omc)
Om
Omc
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))
(ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64)))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64)))
(.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t)))
(+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))
(neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t)))
(*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))
(ratio-of-squares.f64 l t)
#s(literal 1/2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc)))
(*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))
(+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))

Outputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (/ (pow t 2) (pow l 2)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* -1/2 (/ (pow t 2) (pow l 4))) (/ 1 (pow l 2)))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* (pow t 2) (- (* 1/2 (/ (pow t 2) (pow l 6))) (* 1/2 (/ 1 (pow l 4))))) (/ 1 (pow l 2)))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 1))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))
#s(approx (* (/ (* t t) (* l l)) 2) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (/ (* t t) (* l l)) #s(hole binary64 (/ (pow t 2) (pow l 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* (pow t 2) (+ (* -4 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* (pow t 2) (+ (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))) (* (pow t 2) (+ (* -4 (/ (pow Om 2) (* (pow Omc 2) (pow l 4)))) (* 8 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 6)))))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* -2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* (pow t 2) (- (* 4 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 6)))) (* -4 (/ (pow Om 2) (* (pow Omc 2) (pow l 4)))))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 1))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (+ 1 (* -2 (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (+ 1 (* (pow t 2) (- (* 4 (/ (pow t 2) (pow l 4))) (* 2 (/ 1 (pow l 2))))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (+ 1 (* (pow t 2) (- (* (pow t 2) (+ (* -8 (/ (pow t 2) (pow l 6))) (* 4 (/ 1 (pow l 4))))) (* 2 (/ 1 (pow l 2))))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (/ (- (pow l 2) (/ (* (pow Om 2) (pow l 2)) (pow Omc 2))) (pow t 2))))
#s(approx (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) #s(hole binary64 (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t))) #s(hole binary64 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))))
#s(approx (/ (* l l) (* t t)) #s(hole binary64 (/ (pow l 2) (pow t 2))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (* t (sqrt 2)) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/16 (/ (pow l 5) (* (pow t 6) (pow (sqrt 2) 5)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 (pow l 2))) (/ 1 (pow t 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2))))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 8)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* 1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2))))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow Om 2) (pow l 8)) (* (pow Omc 2) (pow t 6)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))))) (pow t 2))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (* 1/2 (/ (pow l 2) (pow t 2)))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (/ (+ (* -1/4 (/ (pow l 4) (pow t 2))) (* 1/2 (pow l 2))) (pow t 2))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (pow l 6) (pow t 4))) (* 1/2 (pow l 2))) (* 1/4 (/ (pow l 4) (pow t 2)))) (pow t 2))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (pow l 8) (pow t 6))) (* 1/2 (pow l 2))) (+ (* -1/8 (/ (pow l 6) (pow t 4))) (* 1/4 (/ (pow l 4) (pow t 2))))) (pow t 2))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (/ (* t (sqrt 2)) l))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/16 (/ (pow l 5) (* (pow t 6) (pow (sqrt 2) 5)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (* t (sqrt 2)))) (* t (sqrt 2))) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* t (sqrt 2)) (* (pow l 2) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (pow (sqrt 2) 3)))) (* 1/2 (/ 1 (* t (sqrt 2))))))) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* t (sqrt 2)) (* (pow l 2) (+ (* (pow l 2) (- (* 1/16 (/ (pow l 2) (* (pow t 5) (pow (sqrt 2) 5)))) (* 1/8 (/ 1 (* (pow t 3) (pow (sqrt 2) 3)))))) (* 1/2 (/ 1 (* t (sqrt 2))))))) l)))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* 1/4 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* (pow l 2) (+ (* -1/8 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4)))))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* (pow l 2) (+ (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4)))) (* (pow l 2) (+ (* -1/8 (/ (pow Om 2) (* (pow Omc 2) (pow t 6)))) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 8)))))))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2)))) (* (pow l 2) (- (* 1/8 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4))))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2)))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 8)))) (* -1/8 (/ (pow Om 2) (* (pow Omc 2) (pow t 6)))))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4))))))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (pow l 2) (pow t 4))) (* 1/2 (/ 1 (pow t 2)))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (* (pow l 2) (+ (* (pow l 2) (- (* 1/8 (/ (pow l 2) (pow t 6))) (* 1/4 (/ 1 (pow t 4))))) (* 1/2 (/ 1 (pow t 2)))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (* (pow l 2) (+ (* (pow l 2) (- (* (pow l 2) (+ (* -1/16 (/ (pow l 2) (pow t 8))) (* 1/8 (/ 1 (pow t 6))))) (* 1/4 (/ 1 (pow t 4))))) (* 1/2 (/ 1 (pow t 2)))))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (* (pow l 2) (- (/ 1 (pow t 2)) (/ (pow Om 2) (* (pow Omc 2) (pow t 2)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow t 4) (pow l 4))) (/ (pow t 2) (pow l 2))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow t 4) (pow l 4))) (+ (* 1/2 (/ (pow t 6) (pow l 6))) (/ (pow t 2) (pow l 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (+ (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (* 8 (/ (* (pow Om 2) (pow t 6)) (* (pow Omc 2) (pow l 6)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ (* 4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (/ (pow Om 2) (pow Omc 2))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ (* -8 (/ (* (pow Om 2) (pow t 6)) (* (pow Omc 2) (pow l 6)))) (/ (pow Om 2) (pow Omc 2))) (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2))))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (- (+ 1 (* 4 (/ (pow t 4) (pow l 4)))) (* 2 (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (- (+ 1 (* -8 (/ (pow t 6) (pow l 6)))) (+ (* -4 (/ (pow t 4) (pow l 4))) (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* -1/8 (/ (pow Om 2) (pow Omc 4))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* (pow Om 2) (- (* -1/16 (/ (pow Om 2) (pow Omc 6))) (* 1/8 (/ 1 (pow Omc 4))))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (/ (* Om Om) (* Omc Omc)) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* 1/2 (/ (pow l 2) (pow t 2)))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (pow l 2) (pow t 2))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))) (/ (pow l 2) (pow t 2)))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (/ (pow l 2) (pow t 2))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))) (/ (pow l 2) (pow t 2)))))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* -1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* -1 (/ (pow Om 4) (pow Omc 4))))))
#s(approx (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (/ (pow Om 4) (pow Omc 4))))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 1))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (+ 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (* Om (sqrt -1)) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* (pow Om 2) (+ (* -1/2 (/ (pow l 2) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (pow l 2) (* (pow Om 2) (pow t 2))))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (* (pow Om 2) (+ (* -1 (/ (pow l 2) (* (pow Omc 2) (pow t 2)))) (/ (pow l 2) (* (pow Om 2) (pow t 2)))))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (* (pow Om 2) (- (/ (pow l 2) (* (pow Om 2) (pow t 2))) (/ (pow l 2) (* (pow Omc 2) (pow t 2)))))))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (pow Om 2)) (/ 1 (pow Omc 2))))))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (pow Om 4) (pow Omc 4)))))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* (pow Om 4) (- (/ 1 (pow Om 4)) (/ 1 (pow Omc 4))))))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (* (pow Om 2) (+ (/ 1 (pow Om 2)) (/ 1 (pow Omc 2))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (* Om (sqrt -1)) Omc))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow Omc 2) (* Om (sqrt -1)))) (* Om (sqrt -1))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* -1/8 (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* (pow Omc 2) (- (* 1/16 (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5)))) (* 1/8 (/ 1 (* (pow Om 3) (pow (sqrt -1) 3)))))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx Omc #s(hole binary64 Omc))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (pow t 2))) (* 1/2 (/ (* (pow Omc 2) (pow l 2)) (pow t 2)))) (pow Omc 2))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (pow t 2))) (/ (* (pow Omc 2) (pow l 2)) (pow t 2))) (pow Omc 2))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (/ (- (/ (* (pow Omc 2) (pow l 2)) (pow t 2)) (/ (* (pow Om 2) (pow l 2)) (pow t 2))) (pow Omc 2))))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* -1 (pow Om 2)) (pow Omc 2)) (pow Omc 2))))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (- (pow Omc 4) (pow Om 4)) (pow Omc 4))))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (/ (+ (pow Om 2) (pow Omc 2)) (pow Omc 2))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (* -1/8 (/ (pow Om 4) (pow Omc 4)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (+ (* -1/8 (/ (pow Om 4) (pow Omc 4))) (* -1/16 (/ (pow Om 6) (pow Omc 6))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))

Calls

12 calls:

Time	Variable		Point	Expression
8.0ms	t	@	inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) 1 (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/ (* Om Om) (* Omc Omc)) Om Omc (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t))) (/ (* l l) (* t t)) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc))) (+ 1 (/ (* Om Om) (* Omc Omc))))
7.0ms	Om	@	-inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) 1 (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/ (* Om Om) (* Omc Omc)) Om Omc (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t))) (/ (* l l) (* t t)) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc))) (+ 1 (/ (* Om Om) (* Omc Omc))))
7.0ms	Om	@	inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) 1 (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/ (* Om Om) (* Omc Omc)) Om Omc (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t))) (/ (* l l) (* t t)) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc))) (+ 1 (/ (* Om Om) (* Omc Omc))))
6.0ms	Om	@	0	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) 1 (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/ (* Om Om) (* Omc Omc)) Om Omc (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t))) (/ (* l l) (* t t)) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc))) (+ 1 (/ (* Om Om) (* Omc Omc))))
6.0ms	l	@	-inf	((asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) 1 (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+ (* (/ (* t t) (* l l)) 2) 1) (* (/ (* t t) (* l l)) 2) (/ (* t t) (* l l)) t l 2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/ (* Om Om) (* Omc Omc)) Om Omc (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t))) (/ (* l l) (* t t)) 1/2 (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc))) (+ 1 (/ (* Om Om) (* Omc Omc))))

rewrite233.0ms (1.4%)

Memory

36.1MiB live, 277.2MiB allocated; 32ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1043	12722
0	1086	9950
1	6026	9773
0	8106	9617

Stop Event

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

Counts

254 → 404

Calls

Call 1

Inputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64))
#s(literal 1 binary64)
(sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))
(ratio-of-squares.f64 t l)
t
l
#s(literal 2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))
(neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))
(ratio-of-squares.f64 Om Omc)
Om
Omc
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))
(ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64)))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64)))
(.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t)))
(+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))
(neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t)))
(*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))
(ratio-of-squares.f64 l t)
#s(literal 1/2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc)))
(*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))
(+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (asin (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)))) #s(hole binary64 (asin (sqrt (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (/ (pow t 2) (pow l 2)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* -1/2 (/ (pow t 2) (pow l 4))) (/ 1 (pow l 2)))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* (pow t 2) (- (* 1/2 (/ (pow t 2) (pow l 6))) (* 1/2 (/ 1 (pow l 4))))) (/ 1 (pow l 2)))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 1))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))
#s(approx (* (/ (* t t) (* l l)) 2) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (/ (* t t) (* l l)) #s(hole binary64 (/ (pow t 2) (pow l 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/2 (* (* (pow t 2) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (* (pow t 2) (+ (* -1 (* (/ 1 (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* -1 (/ (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))) (pow l 2))) (* 8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 6))))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* 1/2 (* (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))) (- (/ (pow Om 2) (* (pow Omc 2) (pow l 4))) (+ (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))) (/ 1 (pow l 4)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* 4 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6))) (* -4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 4))))) (* 2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* (pow t 2) (+ (* -4 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (* (pow t 2) (+ (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))) (* (pow t 2) (+ (* -4 (/ (pow Om 2) (* (pow Omc 2) (pow l 4)))) (* 8 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 6)))))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* -2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* (pow t 2) (- (* 4 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 6)))) (* -4 (/ (pow Om 2) (* (pow Omc 2) (pow l 4)))))) (* 2 (/ (pow Om 2) (* (pow Omc 2) (pow l 2)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 1))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (+ 1 (* -2 (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (+ 1 (* (pow t 2) (- (* 4 (/ (pow t 2) (pow l 4))) (* 2 (/ 1 (pow l 2))))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (+ 1 (* (pow t 2) (- (* (pow t 2) (+ (* -8 (/ (pow t 2) (pow l 6))) (* 4 (/ 1 (pow l 4))))) (* 2 (/ 1 (pow l 2))))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (/ (- (pow l 2) (/ (* (pow Om 2) (pow l 2)) (pow Omc 2))) (pow t 2))))
#s(approx (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) #s(hole binary64 (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t))) #s(hole binary64 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))))
#s(approx (/ (* l l) (* t t)) #s(hole binary64 (/ (pow l 2) (pow t 2))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (* t (sqrt 2)) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/16 (/ (pow l 5) (* (pow t 6) (pow (sqrt 2) 5)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* 2 (/ (pow t 2) (pow l 2)))))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 (pow l 2))) (/ 1 (pow t 2))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2)))) (pow t 2))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/2 (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/8 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/4 (/ (* (pow l 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 2))))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2))))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (- (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (+ (* 1/16 (/ (* (pow Om 2) (pow l 8)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* 1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2))))) (pow t 2))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow Om 2) (pow l 8)) (* (pow Omc 2) (pow t 6)))) (* 1/2 (/ (* (pow Om 2) (pow l 2)) (pow Omc 2)))) (+ (* -1/8 (/ (* (pow Om 2) (pow l 6)) (* (pow Omc 2) (pow t 4)))) (* 1/4 (/ (* (pow Om 2) (pow l 4)) (* (pow Omc 2) (pow t 2)))))) (pow t 2))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (* 1/2 (/ (pow l 2) (pow t 2)))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (/ (+ (* -1/4 (/ (pow l 4) (pow t 2))) (* 1/2 (pow l 2))) (pow t 2))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (pow l 6) (pow t 4))) (* 1/2 (pow l 2))) (* 1/4 (/ (pow l 4) (pow t 2)))) (pow t 2))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (pow l 8) (pow t 6))) (* 1/2 (pow l 2))) (+ (* -1/8 (/ (pow l 6) (pow t 4))) (* 1/4 (/ (pow l 4) (pow t 2))))) (pow t 2))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (/ (* t (sqrt 2)) l))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l)))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* -1 (* t (+ (* -1/8 (/ (pow l 3) (* (pow t 4) (pow (sqrt 2) 3)))) (+ (* 1/16 (/ (pow l 5) (* (pow t 6) (pow (sqrt 2) 5)))) (+ (* 1/2 (/ l (* (pow t 2) (sqrt 2)))) (/ (sqrt 2) l))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* l (sqrt 1/2)) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))) t))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 4) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/2 (* (/ (+ (* 1/16 (* (pow l 8) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/8 (/ (* (pow l 2) (+ (* -1/8 (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* 1/64 (/ (* (pow l 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow (sqrt 1/2) 2))))) (pow (sqrt 1/2) 2)))) (* l (* (pow t 6) (sqrt 1/2)))) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (+ (* -1/8 (* (/ (pow l 3) (* (pow t 2) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (* l (sqrt 1/2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))) t))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (* t (sqrt 2)))) (* t (sqrt 2))) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* t (sqrt 2)) (* (pow l 2) (+ (* -1/8 (/ (pow l 2) (* (pow t 3) (pow (sqrt 2) 3)))) (* 1/2 (/ 1 (* t (sqrt 2))))))) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (+ (* t (sqrt 2)) (* (pow l 2) (+ (* (pow l 2) (- (* 1/16 (/ (pow l 2) (* (pow t 5) (pow (sqrt 2) 5)))) (* 1/8 (/ 1 (* (pow t 3) (pow (sqrt 2) 3)))))) (* 1/2 (/ 1 (* t (sqrt 2))))))) l)))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* -1/8 (* (/ (pow l 2) (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* l (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow l 2) (+ (* -1/8 (* (/ 1 (* (pow t 3) (sqrt 1/2))) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* (pow l 2) (+ (* -1/2 (* (/ (* t (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (* (pow l 2) (* t (+ (* 1/16 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 8))) (* 1/8 (/ (+ (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))) (* 1/64 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (* (pow t 6) (pow (sqrt 1/2) 2))))) (* (pow t 2) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 4))) (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* 1/8 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 6))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 2))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow l 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow t 8))) (* -1/8 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 6))))) (* 1/4 (/ (- 1 (/ (pow Om 2) (pow Omc 2))) (pow t 4)))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* 1/4 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* (pow l 2) (+ (* -1/8 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4)))))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (pow l 2) (- (* (pow l 2) (+ (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4)))) (* (pow l 2) (+ (* -1/8 (/ (pow Om 2) (* (pow Omc 2) (pow t 6)))) (* 1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 8)))))))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 4)))) (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2)))) (* (pow l 2) (- (* 1/8 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 6)))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4))))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (* (pow l 2) (+ (* 1/2 (/ (pow Om 2) (* (pow Omc 2) (pow t 2)))) (* (pow l 2) (- (* (pow l 2) (- (* -1/16 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 8)))) (* -1/8 (/ (pow Om 2) (* (pow Omc 2) (pow t 6)))))) (* 1/4 (/ (pow Om 2) (* (pow Omc 2) (pow t 4))))))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (pow l 2) (pow t 4))) (* 1/2 (/ 1 (pow t 2)))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (* (pow l 2) (+ (* (pow l 2) (- (* 1/8 (/ (pow l 2) (pow t 6))) (* 1/4 (/ 1 (pow t 4))))) (* 1/2 (/ 1 (pow t 2)))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (* (pow l 2) (+ (* (pow l 2) (- (* (pow l 2) (+ (* -1/16 (/ (pow l 2) (pow t 8))) (* 1/8 (/ 1 (pow t 6))))) (* 1/4 (/ 1 (pow t 4))))) (* 1/2 (/ 1 (pow t 2)))))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (* (pow l 2) (- (/ 1 (pow t 2)) (/ (pow Om 2) (* (pow Omc 2) (pow t 2)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow t 4) (pow l 4))) (/ (pow t 2) (pow l 2))))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow t 4) (pow l 4))) (+ (* 1/2 (/ (pow t 6) (pow l 6))) (/ (pow t 2) (pow l 2)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))) (+ (* -1 (* (/ (pow t 2) (pow l 2)) (sqrt (- 1 (/ (pow Om 2) (pow Omc 2)))))) (+ (* -1/2 (* (/ (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (pow l 4)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))) (* -1/2 (* (/ (+ (* 8 (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 2) (+ (* -4 (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))) (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2))))))) (pow l 6)) (sqrt (/ 1 (- 1 (/ (pow Om 2) (pow Omc 2))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* 4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4)))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (- (+ 1 (* -8 (/ (* (pow t 6) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 6)))) (+ (* -4 (/ (* (pow t 4) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 4))) (+ (* 2 (/ (* (pow t 2) (- 1 (/ (pow Om 2) (pow Omc 2)))) (pow l 2))) (/ (pow Om 2) (pow Omc 2)))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (- (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (+ (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))) (* 8 (/ (* (pow Om 2) (pow t 6)) (* (pow Omc 2) (pow l 6)))))) (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ (* 4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (/ (pow Om 2) (pow Omc 2))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2)))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (- (+ (* -8 (/ (* (pow Om 2) (pow t 6)) (* (pow Omc 2) (pow l 6)))) (/ (pow Om 2) (pow Omc 2))) (+ (* -4 (/ (* (pow Om 2) (pow t 4)) (* (pow Omc 2) (pow l 4)))) (* 2 (/ (* (pow Om 2) (pow t 2)) (* (pow Omc 2) (pow l 2))))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (- (+ 1 (* 4 (/ (pow t 4) (pow l 4)))) (* 2 (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(hole binary64 (- (+ 1 (* -8 (/ (pow t 6) (pow l 6)))) (+ (* -4 (/ (pow t 4) (pow l 4))) (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* -1/8 (/ (pow Om 2) (pow Omc 4))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* (pow Om 2) (- (* (pow Om 2) (- (* -1/16 (/ (pow Om 2) (pow Omc 6))) (* 1/8 (/ 1 (pow Omc 4))))) (* 1/2 (/ 1 (pow Omc 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 2) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (* (pow Om 2) (+ (* -1/2 (* (/ 1 (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Om 2) (+ (* -1/8 (* (/ 1 (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 2) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (+ (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) #s(hole binary64 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))
#s(approx (/ (* Om Om) (* Omc Omc)) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* 1/2 (/ (pow l 2) (pow t 2)))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (pow l 2) (pow t 2))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))) (/ (pow l 2) (pow t 2)))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (/ (pow l 2) (pow t 2))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2)))) (/ (pow l 2) (pow t 2)))))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* -1 (/ (pow Om 2) (pow Omc 2))))))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 1))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (* -1 (/ (pow Om 4) (pow Omc 4))))))
#s(approx (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (/ (pow Om 4) (pow Omc 4))))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 1))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (+ 1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (* Om (sqrt -1)) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* -1 (/ (pow Om 2) (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (* (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ 1 (* (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* -1/2 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (* (pow Om 2) (+ (* -1/2 (/ (pow l 2) (* (pow Omc 2) (pow t 2)))) (* 1/2 (/ (pow l 2) (* (pow Om 2) (pow t 2))))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (* (pow Om 2) (+ (* -1 (/ (pow l 2) (* (pow Omc 2) (pow t 2)))) (/ (pow l 2) (* (pow Om 2) (pow t 2)))))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (* -1 (/ (* (pow Om 2) (pow l 2)) (* (pow Omc 2) (pow t 2))))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (* (pow Om 2) (- (/ (pow l 2) (* (pow Om 2) (pow t 2))) (/ (pow l 2) (* (pow Omc 2) (pow t 2)))))))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (pow Om 2) (pow Omc 2)))))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* (pow Om 2) (- (/ 1 (pow Om 2)) (/ 1 (pow Omc 2))))))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (pow Om 4) (pow Omc 4)))))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* (pow Om 4) (- (/ 1 (pow Om 4)) (/ 1 (pow Omc 4))))))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (/ (pow Om 2) (pow Omc 2))))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (* (pow Om 2) (+ (/ 1 (pow Om 2)) (/ 1 (pow Omc 2))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (/ (* Om (sqrt -1)) Omc))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5)))) (+ (* 1/2 (/ Omc (* (pow Om 2) (sqrt -1)))) (/ (sqrt -1) Omc))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* (/ (* Om (sqrt -1)) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (* -1 (* Om (+ (* -1/8 (* (/ (pow Omc 3) (* (pow Om 4) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/16 (* (/ (pow Omc 5) (* (pow Om 6) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* 1/2 (* (/ Omc (* (pow Om 2) (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (/ (sqrt -1) Omc) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow Omc 2) (* Om (sqrt -1)))) (* Om (sqrt -1))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* -1/8 (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* Om (sqrt -1)) (* (pow Omc 2) (+ (* (pow Omc 2) (- (* 1/16 (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5)))) (* 1/8 (/ 1 (* (pow Om 3) (pow (sqrt -1) 3)))))) (* 1/2 (/ 1 (* Om (sqrt -1))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* 1/2 (* (/ (pow Omc 2) (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ (pow Omc 2) (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))) Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (/ (+ (* (* Om (sqrt -1)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))) (* (pow Omc 2) (+ (* 1/2 (* (/ 1 (* Om (sqrt -1))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* (pow Omc 2) (+ (* -1/8 (* (/ 1 (* (pow Om 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* 1/16 (* (/ (pow Omc 2) (* (pow Om 5) (pow (sqrt -1) 5))) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))) Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(hole binary64 (/ (+ (* -1 (/ (pow Om 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (/ (pow Omc 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (pow Omc 2))))
#s(approx Omc #s(hole binary64 Omc))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow Om 2) (pow l 2)) (pow t 2))) (* 1/2 (/ (* (pow Omc 2) (pow l 2)) (pow t 2)))) (pow Omc 2))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(hole binary64 (/ (+ (* -1 (/ (* (pow Om 2) (pow l 2)) (pow t 2))) (/ (* (pow Omc 2) (pow l 2)) (pow t 2))) (pow Omc 2))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) #s(hole binary64 (/ (- (/ (* (pow Omc 2) (pow l 2)) (pow t 2)) (/ (* (pow Om 2) (pow l 2)) (pow t 2))) (pow Omc 2))))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (+ (* -1 (pow Om 2)) (pow Omc 2)) (pow Omc 2))))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (/ (- (pow Omc 4) (pow Om 4)) (pow Omc 4))))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(hole binary64 (/ (+ (pow Om 2) (pow Omc 2)) (pow Omc 2))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (/ (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (sqrt (+ (* (/ (* t t) (* l l)) 2) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (* -1/8 (/ (pow Om 4) (pow Omc 4)))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (pow Om 2) (pow Omc 2))) (+ (* -1/8 (/ (pow Om 4) (pow Omc 4))) (* -1/16 (/ (pow Om 6) (pow Omc 6))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2))))))))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))) (+ (* -1/2 (* (/ (pow Om 2) (pow Omc 2)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (+ (* -1/8 (* (/ (pow Om 4) (pow Omc 4)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))) (* -1/16 (* (/ (pow Om 6) (pow Omc 6)) (sqrt (/ 1 (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))))))))

Outputs
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))))
(asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))))
(/.f64 (neg.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))))))
(/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64))
#s(literal 1 binary64)
(pow.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))))
(exp.f64 (.f64 (log1m.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (ratio-of-squares.f64 t l) #s(literal 3 binary64)) #s(literal 8 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
(/.f64 (+.f64 (.f64 (pow.f64 (ratio-of-squares.f64 t l) #s(literal 3 binary64)) #s(literal 8 binary64)) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (ratio-of-squares.f64 t l)) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))
(+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))
(*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))
(/.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (*.f64 l l))
(+.f64 (ratio-of-squares.f64 t l) (ratio-of-squares.f64 t l))
(*.f64 (pow.f64 (/.f64 t l) #s(literal 1 binary64)) (pow.f64 (/.f64 t l) #s(literal 1 binary64)))
(*.f64 (/.f64 t l) (/.f64 t l))
(.f64 t (/.f64 t (.f64 l l)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) (neg.f64 l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) (fabs.f64 l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 1 binary64)) l)
(ratio-of-squares.f64 (neg.f64 t) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 t) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 t) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 t) l)
(ratio-of-squares.f64 (fabs.f64 t) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 t) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 t) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 t) l)
(ratio-of-squares.f64 t (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 t (neg.f64 l))
(ratio-of-squares.f64 t (fabs.f64 l))
(ratio-of-squares.f64 t l)
(pow.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))
(pow.f64 (/.f64 t l) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 t t) l) l)
(/.f64 (neg.f64 (.f64 t t)) (neg.f64 (.f64 l l)))
(/.f64 (.f64 t t) (.f64 l l))
(exp.f64 (*.f64 (log.f64 (/.f64 t l)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (/.f64 t l)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (/.f64 t l)) #s(literal 2 binary64))))
t
l
#s(literal 2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))))))
(pow.f64 (pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))) #s(literal 1 binary64))
(pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))))
(exp.f64 (.f64 (log.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))) #s(literal 1/2 binary64)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))
(neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))
(*.f64 (pow.f64 (/.f64 Om Omc) #s(literal 1 binary64)) (pow.f64 (/.f64 Om Omc) #s(literal 1 binary64)))
(*.f64 (/.f64 Om Omc) (/.f64 Om Omc))
(.f64 Om (/.f64 Om (.f64 Omc Omc)))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) (neg.f64 Omc))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) (fabs.f64 Omc))
(ratio-of-squares.f64 (pow.f64 Om #s(literal 1 binary64)) Omc)
(ratio-of-squares.f64 (neg.f64 Om) (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 Om) (neg.f64 Omc))
(ratio-of-squares.f64 (neg.f64 Om) (fabs.f64 Omc))
(ratio-of-squares.f64 (neg.f64 Om) Omc)
(ratio-of-squares.f64 (fabs.f64 Om) (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 Om) (neg.f64 Omc))
(ratio-of-squares.f64 (fabs.f64 Om) (fabs.f64 Omc))
(ratio-of-squares.f64 (fabs.f64 Om) Omc)
(ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 1 binary64)))
(ratio-of-squares.f64 Om (neg.f64 Omc))
(ratio-of-squares.f64 Om (fabs.f64 Omc))
(ratio-of-squares.f64 Om Omc)
(pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64))
(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 Om Om) Omc) Omc)
(/.f64 (neg.f64 (.f64 Om Om)) (neg.f64 (.f64 Omc Omc)))
(/.f64 (.f64 Om Om) (.f64 Omc Omc))
(exp.f64 (*.f64 (log.f64 (/.f64 Om Omc)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (/.f64 Om Omc)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (/.f64 Om Omc)) #s(literal 2 binary64))))
Om
Omc
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
(pow.f64 (pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1 binary64))
(pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))
(exp.f64 (.f64 (log.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))
(/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))))
(ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))
(exp.f64 (.f64 (log1m.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))) #s(literal -1 binary64)))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)))))))))
(pow.f64 (pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t))))))) #s(literal 1 binary64))
(pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)))))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)))))))
(exp.f64 (.f64 (log.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t))))))) #s(literal 1/2 binary64)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t))))))
(.f64 #s(literal 1/2 binary64) #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)))))
(.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)))) #s(literal 1/2 binary64))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)) (.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t))) (.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 l t))) (-.f64 (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)) (ratio-of-squares.f64 l t)))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)) #s(literal 3 binary64)) (pow.f64 (ratio-of-squares.f64 l t) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)) (.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t))) (-.f64 (.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 l t)) (.f64 (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)) (ratio-of-squares.f64 l t)))))
(+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)))
(+.f64 (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)) (ratio-of-squares.f64 l t))
(.f64 (.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc)) #s(literal -1 binary64))
(*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t))
(.f64 #s(literal -1 binary64) (.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc)))
(*.f64 (ratio-of-squares.f64 Om Omc) (neg.f64 (ratio-of-squares.f64 l t)))
(/.f64 (.f64 #s(literal -1 binary64) (pow.f64 (.f64 Om l) #s(literal 2 binary64))) (pow.f64 (*.f64 Omc t) #s(literal 2 binary64)))
(neg.f64 (*.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc)))
(*.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc))
(*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))
(.f64 (.f64 Om Om) (ratio-of-squares.f64 l (pow.f64 (*.f64 Omc t) #s(literal 1 binary64))))
(ratio-of-squares.f64 (pow.f64 (.f64 Om l) #s(literal 1 binary64)) (pow.f64 (.f64 Omc t) #s(literal 1 binary64)))
(/.f64 (.f64 (ratio-of-squares.f64 Om Omc) (.f64 l l)) (*.f64 t t))
(/.f64 (neg.f64 (pow.f64 (.f64 Om l) #s(literal 2 binary64))) (neg.f64 (pow.f64 (.f64 Omc t) #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 l t)) (*.f64 Omc Omc))
(/.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)) (*.f64 t t))
(/.f64 (pow.f64 (.f64 Om l) #s(literal 2 binary64)) (pow.f64 (.f64 Omc t) #s(literal 2 binary64)))
(*.f64 (/.f64 l t) (/.f64 l t))
(.f64 l (/.f64 l (.f64 t t)))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 t #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (neg.f64 t))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (fabs.f64 t))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) t)
(ratio-of-squares.f64 (neg.f64 l) (pow.f64 t #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 t))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 t))
(ratio-of-squares.f64 (neg.f64 l) t)
(ratio-of-squares.f64 (fabs.f64 l) (pow.f64 t #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 t))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 t))
(ratio-of-squares.f64 (fabs.f64 l) t)
(ratio-of-squares.f64 l (pow.f64 t #s(literal 1 binary64)))
(ratio-of-squares.f64 l (neg.f64 t))
(ratio-of-squares.f64 l (fabs.f64 t))
(ratio-of-squares.f64 l t)
(/.f64 (/.f64 (*.f64 l l) t) t)
(/.f64 (neg.f64 (.f64 l l)) (neg.f64 (.f64 t t)))
(/.f64 (.f64 l l) (.f64 t t))
#s(literal 1/2 binary64)
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
(pow.f64 (pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1 binary64))
(pow.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))
(exp.f64 (.f64 (log.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)))) (neg.f64 (+.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64))) (+.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64)))
(-.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (ratio-square-sum.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 Om Omc)))
(*.f64 (pow.f64 (pow.f64 (/.f64 Om Omc) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 Om Omc) #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (ratio-of-squares.f64 Om Omc)) (fabs.f64 (ratio-of-squares.f64 Om Omc)))
(*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (neg.f64 (ratio-of-squares.f64 Om Omc)))
(*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))
(.f64 (.f64 Om Om) (pow.f64 (/.f64 Om (*.f64 Omc Omc)) #s(literal 2 binary64)))
(ratio-of-squares.f64 (.f64 Om Om) (.f64 Omc Omc))
(pow.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64))
(pow.f64 (/.f64 Om Omc) #s(literal 4 binary64))
(/.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 Om Omc)) (*.f64 Omc Omc))
(/.f64 (.f64 (ratio-of-squares.f64 Om Omc) (.f64 Om Om)) (*.f64 Omc Omc))
(/.f64 (neg.f64 (pow.f64 Om #s(literal 4 binary64))) (neg.f64 (pow.f64 Omc #s(literal 4 binary64))))
(/.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 Omc #s(literal 4 binary64)))
(exp.f64 (*.f64 (log.f64 (ratio-of-squares.f64 Om Omc)) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
(+.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 (sin.f64 (acos.f64 (/.f64 Om Omc))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 (sin.f64 (acos.f64 (/.f64 Om Omc))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (sin.f64 (acos.f64 (/.f64 Om Omc))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (neg.f64 (*.f64 (sin.f64 (acos.f64 (/.f64 Om Omc))) (ratio-of-squares.f64 t l))) (sin.f64 (acos.f64 (/.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (-.f64 (neg.f64 (.f64 (pow.f64 l #s(literal -2 binary64)) (sin.f64 (acos.f64 (/.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (cosh.f64 (atanh.f64 (/.f64 Om Omc))) (.f64 (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (.f64 t t))))) (*.f64 t t)) (sin.f64 (acos.f64 (/.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 t t) (.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (.f64 l l))) (.f64 #s(literal -8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (cosh.f64 (atanh.f64 (/.f64 Om Omc))) (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))))))) (.f64 t t)) (neg.f64 (.f64 (pow.f64 l #s(literal -2 binary64)) (sin.f64 (acos.f64 (/.f64 Om Omc)))))) (*.f64 t t)) (sin.f64 (acos.f64 (/.f64 Om Omc)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) #s(literal 1 binary64))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (.f64 (+.f64 (.f64 (ratio-of-squares.f64 t (.f64 l l)) #s(literal -1/2 binary64)) (pow.f64 l #s(literal -2 binary64))) (.f64 t t)) #s(literal 1 binary64)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (ratio-of-squares.f64 t (pow.f64 l #s(literal 3 binary64))) (pow.f64 l #s(literal -4 binary64)))) (.f64 t t)) (pow.f64 l #s(literal -2 binary64))) (*.f64 t t)) #s(literal 1 binary64)))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) #s(literal 1 binary64))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))))
#s(approx (* (/ (* t t) (* l l)) 2) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))
#s(approx (/ (* t t) (* l l)) (ratio-of-squares.f64 t l))
#s(approx t t)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (sin.f64 (acos.f64 (/.f64 Om Omc))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (neg.f64 (*.f64 (sin.f64 (acos.f64 (/.f64 Om Omc))) (ratio-of-squares.f64 t l))) (sin.f64 (acos.f64 (/.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (-.f64 (neg.f64 (.f64 (pow.f64 l #s(literal -2 binary64)) (sin.f64 (acos.f64 (/.f64 Om Omc))))) (.f64 #s(literal -1/2 binary64) (.f64 (cosh.f64 (atanh.f64 (/.f64 Om Omc))) (.f64 (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (.f64 t t))))) (*.f64 t t)) (sin.f64 (acos.f64 (/.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 t t) (.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))))) (.f64 l l))) (.f64 #s(literal -8 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (cosh.f64 (atanh.f64 (/.f64 Om Omc))) (-.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)) (+.f64 (pow.f64 l #s(literal -4 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))))))) (.f64 t t)) (neg.f64 (.f64 (pow.f64 l #s(literal -2 binary64)) (sin.f64 (acos.f64 (/.f64 Om Omc)))))) (*.f64 t t)) (sin.f64 (acos.f64 (/.f64 Om Omc)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)) #s(literal 2 binary64))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 t t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 4 binary64)))) #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l))) (*.f64 t t)) #s(literal 1 binary64)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 t t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64)))) #s(literal -8 binary64)) (/.f64 (.f64 #s(literal -4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))) (.f64 t t)) (.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 l l)))) (.f64 t t)) #s(literal 1 binary64)) (ratio-of-squares.f64 Om Omc)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (neg.f64 (ratio-of-squares.f64 Om Omc)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l)) #s(literal 2 binary64)) (ratio-of-squares.f64 Om Omc)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (-.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t (.f64 l l))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) l))) (.f64 t t)) (ratio-of-squares.f64 Om Omc)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (-.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t (pow.f64 l #s(literal 3 binary64)))) #s(literal 8 binary64)) (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)))) (.f64 t t)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) l) #s(literal 2 binary64))) (*.f64 t t)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l)) #s(literal -2 binary64)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t (.f64 l l))) #s(literal 4 binary64)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) l) #s(literal 2 binary64))) (.f64 t t)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t (pow.f64 l #s(literal 3 binary64)))) #s(literal -8 binary64)) (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 l l)))) (.f64 t t)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) l) #s(literal 2 binary64))) (*.f64 t t)) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) #s(literal 1 binary64))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (+.f64 (.f64 (-.f64 (.f64 (ratio-of-squares.f64 t (.f64 l l)) #s(literal 4 binary64)) (.f64 (pow.f64 l #s(literal -2 binary64)) #s(literal 2 binary64))) (*.f64 t t)) #s(literal 1 binary64)))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -8 binary64) (ratio-of-squares.f64 t (pow.f64 l #s(literal 3 binary64)))) (.f64 #s(literal -4 binary64) (pow.f64 l #s(literal -4 binary64)))) (.f64 t t)) (.f64 (pow.f64 l #s(literal -2 binary64)) #s(literal 2 binary64))) (*.f64 t t)) #s(literal 1 binary64)))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (.f64 (/.f64 (.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (-.f64 (ratio-of-squares.f64 l t) (*.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc))))
#s(approx (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)))
#s(approx (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t))) (*.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (* l l) (* t t)) (ratio-of-squares.f64 l t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) t) (sin.f64 (acos.f64 (/.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64)))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))))) (.f64 (.f64 l (pow.f64 t #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc))))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64)))) t))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) l))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) l) (/.f64 (.f64 #s(literal 1/2 binary64) l) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 t t)))) t))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) l) (/.f64 (.f64 #s(literal 1/2 binary64) l) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 t t))))) t))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 5 binary64))) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) l) (/.f64 (.f64 #s(literal 1/2 binary64) l) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 t t))))) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 4 binary64))))) t))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) (.f64 (pow.f64 l #s(literal -2 binary64)) #s(literal 2 binary64))) (*.f64 t t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) t) (sin.f64 (acos.f64 (/.f64 Om Omc)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64)))) t))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))))) (.f64 (.f64 l (pow.f64 t #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc))))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64)))) t))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (+.f64 (.f64 (.f64 (.f64 l l) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal -1/4 binary64))) (*.f64 t t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64))) #s(literal 1/8 binary64)) (.f64 (.f64 (.f64 l l) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 (-.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 l #s(literal 8 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))) #s(literal -1/16 binary64)) (.f64 (.f64 (.f64 l l) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)))) (*.f64 t t)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc)) #s(literal -1/2 binary64)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t)) #s(literal 1/4 binary64)) (.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)) #s(literal 1/2 binary64))) (*.f64 t t)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (-.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 t t))) #s(literal -1/8 binary64)) (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t)) #s(literal -1/4 binary64))) (.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)) #s(literal 1/2 binary64))) (.f64 t t)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 t t))) #s(literal -1/8 binary64)) (-.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 t #s(literal 3 binary64)))) #s(literal 1/16 binary64)) (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t)) #s(literal -1/4 binary64))) (.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)) #s(literal 1/2 binary64)))) (.f64 t t)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t)) #s(literal -1/4 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)))) (*.f64 t t)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (-.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 t t))) #s(literal 1/8 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)))) (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t)) #s(literal 1/4 binary64))) (.f64 t t)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (-.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 t #s(literal 3 binary64)))) #s(literal -1/16 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Om Om) (ratio-of-squares.f64 l Omc)))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 t t))) #s(literal -1/8 binary64)) (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 l l) t)) #s(literal -1/4 binary64)))) (.f64 t t)))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (*.f64 (ratio-of-squares.f64 l t) #s(literal 1/2 binary64)))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (/.f64 (-.f64 (.f64 (ratio-of-squares.f64 (.f64 l l) t) #s(literal -1/4 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (*.f64 t t)))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 t #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (.f64 (ratio-of-squares.f64 (.f64 l l) t) #s(literal 1/4 binary64))) (.f64 t t)))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (pow.f64 t #s(literal 6 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (-.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 t #s(literal 4 binary64))) (.f64 (ratio-of-squares.f64 (.f64 l l) t) #s(literal -1/4 binary64)))) (*.f64 t t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) t) (sin.f64 (acos.f64 (/.f64 Om Omc))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64)))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))))) (.f64 (.f64 l (pow.f64 t #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc))))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64)))) t)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) l)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (neg.f64 (.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) l) (/.f64 (.f64 #s(literal 1/2 binary64) l) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 t t)))) t)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (neg.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) l) (/.f64 (.f64 #s(literal 1/2 binary64) l) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 t t))))) t)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (neg.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 5 binary64))) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) l) (/.f64 (.f64 #s(literal 1/2 binary64) l) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 t t))))) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 4 binary64))))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) t) (sin.f64 (acos.f64 (/.f64 Om Omc))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64)))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l (pow.f64 t #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 l #s(literal 8 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1/2 binary64))) #s(literal 1/64 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 l #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal 1/2 binary64))))) (.f64 (.f64 l (pow.f64 t #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc))))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 l #s(literal 3/2 binary64)) t) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64)))) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64))) l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 l l) t) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal 3 binary64)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))))) (.f64 l l)) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sin.f64 (acos.f64 (/.f64 Om Omc))))) l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) t) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 l l) t) (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 8 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 (.f64 t t) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))))) (.f64 l l)) (.f64 (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal 3 binary64)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64))) (.f64 l l)) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sin.f64 (acos.f64 (/.f64 Om Omc))))) l))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (+.f64 (/.f64 (.f64 (.f64 l l) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (.f64 (sqrt.f64 #s(literal 2 binary64)) t)) l))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) #s(literal -1/8 binary64))) (.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) l))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 5/2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64))) #s(literal 1/16 binary64)) (.f64 (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(literal -3 binary64)) #s(literal 1/8 binary64))) (.f64 l l)) (/.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) t))) (.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) l))
#s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) (ratio-of-squares.f64 l l)))
#s(approx l l)
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64))) l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 l l) t) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal 3 binary64)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))))) (.f64 l l)) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sin.f64 (acos.f64 (/.f64 Om Omc))))) l))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) t) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 l l) t) (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 8 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 (.f64 t t) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))))) (.f64 l l)) (.f64 (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal 3 binary64)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) #s(literal -1/8 binary64))) (.f64 l l)) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sin.f64 (acos.f64 (/.f64 Om Omc))))) l))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64))) #s(literal -1/4 binary64))) (*.f64 l l)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 6 binary64)))) #s(literal 1/8 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 4 binary64)))) (.f64 l l)) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t))) (.f64 l l)))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 8 binary64)))) #s(literal -1/16 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64)))) (.f64 l l)) (.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 t #s(literal 4 binary64))))) (.f64 l l)) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t))) (*.f64 l l)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (.f64 t t))) #s(literal 1/4 binary64)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) t) #s(literal 1/2 binary64))) (.f64 l l)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (-.f64 (.f64 (+.f64 (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 t t)) #s(literal 1/4 binary64)) (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3 binary64)))) #s(literal -1/8 binary64))) (.f64 l l)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) t) #s(literal 1/2 binary64))) (*.f64 l l)))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (.f64 (-.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (pow.f64 t #s(literal 4 binary64)))) #s(literal 1/16 binary64)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64))) (.f64 l l)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 t t)) #s(literal 1/4 binary64))) (.f64 l l)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) t) #s(literal 1/2 binary64))) (.f64 l l)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (.f64 t t))) #s(literal -1/4 binary64)) (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 (/.f64 Om Omc) t))) (.f64 l l)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3 binary64)))) #s(literal 1/8 binary64)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 t t)) #s(literal 1/4 binary64))) (.f64 l l)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) t) #s(literal 1/2 binary64))) (*.f64 l l)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l (pow.f64 t #s(literal 4 binary64)))) #s(literal -1/16 binary64)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64))) (.f64 l l)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) (.f64 t t)) #s(literal 1/4 binary64))) (.f64 l l)) (.f64 (ratio-of-squares.f64 (/.f64 Om Omc) t) #s(literal 1/2 binary64))) (.f64 l l)))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (.f64 (-.f64 (.f64 (ratio-of-squares.f64 l (.f64 t t)) #s(literal -1/4 binary64)) (.f64 #s(literal -1/2 binary64) (pow.f64 t #s(literal -2 binary64)))) (*.f64 l l)))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (.f64 (-.f64 (.f64 (-.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3 binary64))) #s(literal 1/8 binary64)) (.f64 (pow.f64 t #s(literal -4 binary64)) #s(literal 1/4 binary64))) (.f64 l l)) (.f64 #s(literal -1/2 binary64) (pow.f64 t #s(literal -2 binary64)))) (*.f64 l l)))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 4 binary64))) #s(literal -1/16 binary64)) (.f64 #s(literal -1/8 binary64) (pow.f64 t #s(literal -6 binary64)))) (.f64 l l)) (.f64 (pow.f64 t #s(literal -4 binary64)) #s(literal 1/4 binary64))) (.f64 l l)) (.f64 #s(literal -1/2 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 l l)))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (.f64 (/.f64 (.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (neg.f64 (.f64 (sin.f64 (acos.f64 (/.f64 Om Omc))) (ratio-of-squares.f64 t l))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal -3 binary64) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64)))) (cosh.f64 (atanh.f64 (/.f64 Om Omc))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 #s(literal -3 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -3 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 t t)) (.f64 (.f64 #s(literal 8 binary64) (pow.f64 t #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 6 binary64))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))))) (neg.f64 (.f64 (sin.f64 (acos.f64 (/.f64 Om Omc))) (ratio-of-squares.f64 t l)))) (sin.f64 (acos.f64 (/.f64 Om Omc)))))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 t #s(literal 4 binary64))) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 t l)) #s(literal 1 binary64)))
#s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 t #s(literal 4 binary64))) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)) (pow.f64 l #s(literal 6 binary64))) (ratio-of-squares.f64 t l))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (neg.f64 (.f64 (sin.f64 (acos.f64 (/.f64 Om Omc))) (ratio-of-squares.f64 t l))) (sin.f64 (acos.f64 (/.f64 Om Omc)))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal -3 binary64) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64)))) (cosh.f64 (atanh.f64 (/.f64 Om Omc))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 #s(literal -3 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 4 binary64))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))) (.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -3 binary64) (.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 t t)) (.f64 (.f64 #s(literal 8 binary64) (pow.f64 t #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (pow.f64 l #s(literal 6 binary64))) (cosh.f64 (atanh.f64 (/.f64 Om Omc)))))) (neg.f64 (.f64 (sin.f64 (acos.f64 (/.f64 Om Omc))) (ratio-of-squares.f64 t l)))) (sin.f64 (acos.f64 (/.f64 Om Omc)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal -4 binary64) (pow.f64 t #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (.f64 (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)) #s(literal 2 binary64)) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 t #s(literal 6 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (pow.f64 l #s(literal 6 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -4 binary64) (pow.f64 t #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 l #s(literal 4 binary64))) (.f64 (/.f64 (.f64 (.f64 t t) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 l l)) #s(literal 2 binary64))) (ratio-of-squares.f64 Om Omc))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 t t) (.f64 l l))) #s(literal -4 binary64)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l)) #s(literal 2 binary64)) (ratio-of-squares.f64 Om Omc))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (-.f64 (+.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l)) #s(literal 2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) #s(literal -8 binary64))) (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 t t) (.f64 l l))) #s(literal -4 binary64))) (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 t t) (.f64 l l))) #s(literal 4 binary64)) (ratio-of-squares.f64 Om Omc)) (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l)) #s(literal 2 binary64))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (-.f64 (-.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) #s(literal -8 binary64)) (ratio-of-squares.f64 Om Omc)) (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 (.f64 t t) (.f64 l l))) #s(literal -4 binary64))) (.f64 (.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 t l)) #s(literal 2 binary64))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 t #s(literal 4 binary64))) (pow.f64 l #s(literal 4 binary64))) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))
#s(approx (/ (* 1 1) (+ 1 (* (/ (* t t) (* l l)) 2))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (pow.f64 t #s(literal 6 binary64))) (pow.f64 l #s(literal 6 binary64))) #s(literal 1 binary64)) (-.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 t #s(literal 4 binary64))) (pow.f64 l #s(literal 4 binary64))) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) #s(literal -1/8 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Om Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/16 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal -4 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Om Om)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Om Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1 binary64)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (.f64 (-.f64 (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) #s(literal -1/8 binary64)) (.f64 (pow.f64 Omc #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) #s(literal -1/16 binary64)) (.f64 (pow.f64 Omc #s(literal -4 binary64)) #s(literal 1/8 binary64))) (.f64 Om Om)) (.f64 (pow.f64 Omc #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om (.f64 Omc Omc)) #s(literal -1/8 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Om Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 Om (pow.f64 Omc #s(literal 3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/16 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal -4 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Om Om)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 Omc #s(literal -2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Om Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (+.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (/.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))))))
#s(approx (neg (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1))) (/.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (ratio-of-squares.f64 Om Omc) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (/ (* Om Om) (* Omc Omc)) (ratio-of-squares.f64 Om Omc))
#s(approx Om Om)
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (*.f64 (ratio-of-squares.f64 l t) #s(literal 1/2 binary64)))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 l t))))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t))))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (ratio-of-squares.f64 l t))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (+.f64 (ratio-of-squares.f64 l t) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t))))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) #s(literal 1 binary64)))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+.f64 (neg.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc))) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) (+.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))) Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 6 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Om))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) Om) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc)) Om))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))) Om))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 6 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))) Om))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 6 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Om))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (-.f64 (.f64 (pow.f64 Om #s(literal -2 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))) (.f64 (pow.f64 Omc #s(literal -2 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 Om Om)))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (.f64 (.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc)) #s(literal -1/2 binary64)))
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (.f64 (+.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 (.f64 Om t) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (.f64 (ratio-of-squares.f64 l (pow.f64 (.f64 Omc t) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 Om Om)))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (.f64 (+.f64 (neg.f64 (ratio-of-squares.f64 l (pow.f64 (.f64 Omc t) #s(literal 1 binary64)))) (ratio-of-squares.f64 l (pow.f64 (.f64 Om t) #s(literal 1 binary64)))) (.f64 Om Om)))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (*.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 l t)))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (.f64 (-.f64 (ratio-of-squares.f64 l (pow.f64 (.f64 Om t) #s(literal 1 binary64))) (ratio-of-squares.f64 l (pow.f64 (.f64 Omc t) #s(literal 1 binary64)))) (.f64 Om Om)))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) (neg.f64 (ratio-of-squares.f64 Om Omc)))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) (.f64 (-.f64 (pow.f64 Om #s(literal -2 binary64)) (pow.f64 Omc #s(literal -2 binary64))) (.f64 Om Om)))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (neg.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64))))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (*.f64 (-.f64 (pow.f64 Om #s(literal -4 binary64)) (pow.f64 Omc #s(literal -4 binary64))) (pow.f64 Om #s(literal 4 binary64))))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) (ratio-of-squares.f64 Om Omc))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) (.f64 (+.f64 (pow.f64 Om #s(literal -2 binary64)) (pow.f64 Omc #s(literal -2 binary64))) (.f64 Om Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (neg.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))) Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 6 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Om)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) Om) Omc)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (neg.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc)) Om)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (neg.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))) Om)))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (neg.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 6 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc))) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (neg.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))) Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (neg.f64 (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 Omc #s(literal 5 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 Om #s(literal 6 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) Omc) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) Omc) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 Om Om))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 Omc #s(literal 3 binary64))) (.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Om)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc Omc)) (.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/8 binary64))) (.f64 Omc Omc)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/16 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) #s(literal -3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Omc Omc)) (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Omc Omc)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc Omc)) (.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) (.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) #s(literal -1/8 binary64))) (.f64 Omc Omc)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) Omc))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))) #s(literal 1/16 binary64)) (.f64 (pow.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) #s(literal -3 binary64)) #s(literal 1/8 binary64))) (.f64 Omc Omc)) (/.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) Om))) (.f64 Omc Omc)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 Omc Omc)) (.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 3/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal -1/8 binary64))) (.f64 Omc Omc)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Omc))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (/.f64 (ratio-of-squares.f64 Omc (pow.f64 Om #s(literal 5/2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) #s(literal 1/16 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) #s(literal -3 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Omc Omc)) (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) Om)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 Omc Omc)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) Om) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) Omc))
#s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (+.f64 (/.f64 (.f64 Omc Omc) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))) (/.f64 (neg.f64 (.f64 Om Om)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l))))) (*.f64 Omc Omc)))
#s(approx Omc Omc)
#s(approx (* (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) 1/2) (/.f64 (-.f64 (.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 l t)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 Omc Omc) (ratio-of-squares.f64 l t)))) (*.f64 Omc Omc)))
#s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (/.f64 (+.f64 (neg.f64 (.f64 (.f64 Om Om) (ratio-of-squares.f64 l t))) (.f64 (.f64 Omc Omc) (ratio-of-squares.f64 l t))) (*.f64 Omc Omc)))
#s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (-.f64 (/.f64 (.f64 (.f64 Omc Omc) (ratio-of-squares.f64 l t)) (.f64 Omc Omc)) (.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc))))
#s(approx (/ (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (+ 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (neg.f64 (ratio-of-squares.f64 Om Omc)) (ratio-of-squares.f64 Omc Omc)))
#s(approx (- 1 (* (/ (* Om Om) (* Omc Omc)) (/ (* Om Om) (* Omc Omc)))) (/.f64 (-.f64 (pow.f64 Omc #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (pow.f64 Omc #s(literal 4 binary64))))
#s(approx (+ 1 (/ (* Om Om) (* Omc Omc))) (+.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Omc Omc)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (.f64 (.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (+.f64 (.f64 (.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 Om #s(literal 6 binary64))) (pow.f64 Omc #s(literal 6 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) #s(literal 1 binary64)) (.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)) #s(literal -1/8 binary64))))
#s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) (+.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (.f64 #s(literal 1/8 binary64) (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 Om #s(literal 6 binary64))) (pow.f64 Omc #s(literal 6 binary64)))) #s(literal 1 binary64)))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (.f64 (.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (+.f64 (+.f64 (+.f64 (.f64 (.f64 (pow.f64 (ratio-of-squares.f64 Om Omc) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 Om Omc)) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 Om #s(literal 6 binary64))) (pow.f64 Omc #s(literal 6 binary64))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))) (sqrt.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))

eval1.7s (10.5%)

Memory

58.6MiB live, 2 582.1MiB allocated; 464ms collecting garbage

Samples

907.0ms	22 202×	0	valid
232.0ms	5 644×	0	invalid
14.0ms	25×	2	valid
5.0ms	33×	1	valid

Compiler

Compiled 28 508 to 3 524 computations (87.6% saved)

Precisions

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

ival-mult: 336.0ms (57.3% of total)

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

ival-add: 38.0ms (6.5% of total)

ival-true: 15.0ms (2.6% of total)

ival-log: 15.0ms (2.6% of total)

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

adjust: 8.0ms (1.4% of total)

ival-sub: 2.0ms (0.3% of total)

exact: 0.0ms (0% of total)

prune401.0ms (2.5%)

Memory

1.9MiB live, 532.7MiB allocated; 61ms collecting garbage

Pruning

16 alts after pruning (11 fresh and 5 done)

	Pruned	Kept	Total
New	552	7	559
Fresh	3	4	7
Picked	3	2	5
Done	0	3	3
Total	558	16	574

Accuracy

98.9%

Counts

574 → 16

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	70.4%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
	70.4%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 t l) (/.f64 t l)) #s(literal 2 binary64))))))
	50.0%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (ratio-square-sum.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64))))))
✓	50.0%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
	37.4%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))
	37.6%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (-.f64 (ratio-of-squares.f64 l t) (*.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc))))) #s(literal 1/2 binary64)))))
✓	9.9%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
✓	49.6%	(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
	24.5%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (.f64 (.f64 Om Om) (-.f64 (pow.f64 Om #s(literal -2 binary64)) (pow.f64 Omc #s(literal -2 binary64)))))))) t)))
	50.1%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 #s(approx ( 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t)))
	50.4%	(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l)))
	36.4%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 #s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
	49.4%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) l)))))
	62.6%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))
	47.7%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) l) (/.f64 (.f64 #s(literal 1/2 binary64) l) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 t t)))) t)))))
✓	84.3%	#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))

Samples

236.0ms	5 512×	0	valid
18.0ms	376×	0	invalid

Compiler

Compiled 2 673 to 828 computations (69% saved)

Precisions

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

ival-mult: 61.0ms (55.3% of total)

ival-div: 33.0ms (29.9% of total)

ival-add: 10.0ms (9.1% of total)

ival-true: 3.0ms (2.7% of total)

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

adjust: 1.0ms (0.9% of total)

regimes149.0ms (0.9%)

Memory

-9.9MiB live, 275.8MiB allocated; 30ms collecting garbage

Counts

39 → 2

Calls

Call 1

Inputs
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (ratio-square-sum.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 #s(approx ( 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t)))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 #s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (-.f64 (ratio-of-squares.f64 l t) (*.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc))))) #s(literal 1/2 binary64)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 #s(approx ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 l l)) (.f64 t t)) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l)))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) l)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 Om Omc))) (+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 t l) (/.f64 t l)) #s(literal 2 binary64))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 t t)) #s(literal 1/2 binary64)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) t)) #s(literal 1/2 binary64)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) l) (/.f64 (.f64 #s(literal 1/2 binary64) l) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 t t)))) t)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (.f64 t (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 l (.f64 (.f64 t t) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) l)))))))
(asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (pow (/ Om Omc) 2)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l)))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (+.f64 (.f64 (.f64 t t) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (pow.f64 t #s(literal 3 binary64)))) l)))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (.f64 (.f64 l l) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))))) l)))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (.f64 (.f64 Om Om) (-.f64 (pow.f64 Om #s(literal -2 binary64)) (pow.f64 Omc #s(literal -2 binary64)))))))) t)))
(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (/.f64 (+.f64 (.f64 l (.f64 (.f64 t t) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (pow.f64 t #s(literal 3 binary64))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) #s(approx (* (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) l) (.f64 (pow.f64 l #s(literal 3 binary64)) (+.f64 (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) (.f64 (.f64 l l) t)) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) (.f64 (.f64 Om Om) (-.f64 (pow.f64 Om #s(literal -2 binary64)) (pow.f64 Omc #s(literal -2 binary64))))))) (.f64 (.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) #s(literal -1/8 binary64))) l)))
(asin.f64 (sqrt.f64 (/.f64 (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) t) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/8 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))) (pow.f64 t #s(literal 6 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 t #s(literal 3 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))) (.f64 l l)) (.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) t) (sqrt.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) l)))

Outputs

(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (*.f64 l (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))

#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))

Calls

14 calls:

16.0ms	l
14.0ms	Omc
13.0ms	(pow.f64 (/.f64 t l) #s(literal 2 binary64))
12.0ms	(/.f64 Om Omc)
10.0ms	Om

Results

Accuracy	Segments	Branch
98.7%	2	`(/.f64 t l)`
98.7%	2	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
98.7%	2	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
98.7%	2	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
85.0%	1	`(/.f64 Om Omc)`
85.0%	1	`(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))`
85.0%	1	`(-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))`
98.7%	2	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
98.7%	2	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
98.7%	2	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`
87.9%	2	`t`
88.5%	2	`l`
85.0%	1	`Om`
85.0%	1	`Omc`

Compiler

Compiled 97 to 112 computations (-15.5% saved)

regimes34.0ms (0.2%)

Memory

14.9MiB live, 61.1MiB allocated; 2ms collecting garbage

Counts

18 → 2

Calls

Call 1

Inputs
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (ratio-square-sum.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 #s(approx ( 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t)))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 #s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (-.f64 (ratio-of-squares.f64 l t) (*.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc))))) #s(literal 1/2 binary64)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 #s(approx ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 l l)) (.f64 t t)) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l)))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t)))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) l)))))

Outputs

(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (*.f64 #s(approx (+ (* (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l)))

#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))

Calls

7 calls:

6.0ms	(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))
5.0ms	(/.f64 t l)
5.0ms	(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))
5.0ms	(pow.f64 (/.f64 t l) #s(literal 2 binary64))
4.0ms	(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))

Results

Accuracy	Segments	Branch
98.3%	2	`(/.f64 t l)`
98.3%	2	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
98.3%	2	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
98.3%	2	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
98.3%	2	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
98.3%	2	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
98.3%	2	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`

Compiler

Compiled 78 to 75 computations (3.8% saved)

regimes30.0ms (0.2%)

Memory

7.1MiB live, 53.4MiB allocated; 3ms collecting garbage

Counts

15 → 2

Calls

Call 1

Inputs
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (ratio-square-sum.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 #s(approx ( 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t)))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 #s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (-.f64 (ratio-of-squares.f64 l t) (*.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc))))) #s(literal 1/2 binary64)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 Om Omc) (ratio-of-squares.f64 l t))) (ratio-of-squares.f64 l t))) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 (/.f64 #s(approx ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (.f64 l l)) (.f64 t t)) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 (/.f64 (ratio-of-squares.f64 Om Omc) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))

Outputs

(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (*.f64 l (sqrt.f64 #s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t)))

#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64))))))

Calls

7 calls:

5.0ms	(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))
4.0ms	(/.f64 t l)
4.0ms	(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))
4.0ms	(pow.f64 (/.f64 t l) #s(literal 2 binary64))
4.0ms	(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))

Results

Accuracy	Segments	Branch
98.0%	2	`(/.f64 t l)`
98.0%	2	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
98.0%	2	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
98.0%	2	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
98.0%	2	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
98.0%	2	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
98.0%	2	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`

Compiler

Compiled 78 to 75 computations (3.8% saved)

regimes23.0ms (0.1%)

Memory

-1.7MiB live, 44.8MiB allocated; 2ms collecting garbage

Counts

10 → 2

Calls

Call 1

Inputs
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (ratio-square-sum.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64))))))
(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 #s(approx ( 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t)))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) (sqrt.f64 #s(approx (+ (* (/ (* t t) (* l l)) 2) 1) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) #s(approx (+ (neg (* (/ (* Om Om) (* Omc Omc)) (/ (* l l) (* t t)))) (/ (* l l) (* t t))) (-.f64 (ratio-of-squares.f64 l t) (*.f64 (ratio-of-squares.f64 l t) (ratio-of-squares.f64 Om Omc))))) #s(literal 1/2 binary64)))))

Outputs

(asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2))))) (/.f64 (*.f64 l (sqrt.f64 #s(approx (* 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t)))

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))

Calls

7 calls:

4.0ms	(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))
3.0ms	(/.f64 t l)
3.0ms	(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))
3.0ms	(pow.f64 (/.f64 t l) #s(literal 2 binary64))
3.0ms	(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))

Results

Accuracy	Segments	Branch
98.0%	2	`(/.f64 t l)`
98.0%	2	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
98.0%	2	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
98.0%	2	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
98.0%	2	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
98.0%	2	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
98.0%	2	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`

Compiler

Compiled 78 to 75 computations (3.8% saved)

regimes39.0ms (0.2%)

Memory

-24.5MiB live, 70.6MiB allocated; 9ms collecting garbage

Counts

7 → 2

Calls

Call 1

Inputs
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (ratio-square-sum.f64 (ratio-of-squares.f64 Om Omc) #s(literal 1 binary64))))))

Outputs

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (*.f64 #s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))))))

Calls

14 calls:

6.0ms	(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))
4.0ms	(/.f64 Om Omc)
3.0ms	Om
3.0ms	t
3.0ms	l

Results

Accuracy	Segments	Branch
70.4%	1	`(-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))`
70.4%	1	`Om`
70.4%	1	`(/.f64 Om Omc)`
70.4%	1	`(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))`
70.4%	1	`Omc`
78.9%	2	`t`
78.5%	2	`l`
85.2%	2	`(/.f64 t l)`
85.2%	2	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
85.2%	2	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
85.2%	2	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
85.2%	2	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
85.2%	2	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
85.2%	2	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`

Compiler

Compiled 97 to 112 computations (-15.5% saved)

regimes14.0ms (0.1%)

Memory

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

Counts

5 → 2

Calls

Call 1

Inputs
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))

Outputs

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (*.f64 #s(approx (/ (* (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64)))))

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))

Calls

7 calls:

2.0ms	(/.f64 t l)
2.0ms	(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))
2.0ms	(pow.f64 (/.f64 t l) #s(literal 2 binary64))
2.0ms	(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))
2.0ms	(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))

Results

Accuracy	Segments	Branch
84.7%	2	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
84.7%	2	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
84.7%	2	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
84.7%	2	`(/.f64 t l)`
84.7%	2	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
84.7%	2	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
84.7%	2	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`

Compiler

Compiled 78 to 75 computations (3.8% saved)

regimes27.0ms (0.2%)

Memory

-40.5MiB live, 52.7MiB allocated; 4ms collecting garbage

Counts

4 → 1

Calls

Call 1

Inputs
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))

Outputs

#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))

Calls

14 calls:

3.0ms	(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))
2.0ms	t
2.0ms	Omc
2.0ms	Om
2.0ms	l

Results

Accuracy	Segments	Branch
62.6%	1	`(-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))`
62.6%	1	`Omc`
62.6%	1	`(/.f64 Om Omc)`
62.6%	1	`(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))`
62.6%	1	`Om`
62.6%	1	`l`
62.6%	1	`t`
62.6%	1	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
62.6%	1	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
62.6%	1	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
62.6%	1	`(/.f64 t l)`
62.6%	1	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
62.6%	1	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
62.6%	1	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`

Compiler

Compiled 97 to 112 computations (-15.5% saved)

regimes22.0ms (0.1%)

Memory

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

Counts

3 → 2

Calls

Call 1

Inputs

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))

Outputs

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))))

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))

Calls

14 calls:

2.0ms	(/.f64 t l)
2.0ms	t
2.0ms	l
2.0ms	Om
2.0ms	Omc

Results

Accuracy	Segments	Branch
57.5%	2	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
57.5%	2	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
57.5%	2	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
54.2%	2	`t`
57.6%	2	`(/.f64 t l)`
57.5%	2	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
57.5%	2	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
57.5%	2	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`
52.1%	2	`l`
50.0%	1	`Omc`
50.0%	1	`(-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))`
50.0%	1	`(/.f64 Om Omc)`
50.0%	1	`(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))`
50.0%	1	`Om`

Compiler

Compiled 97 to 112 computations (-15.5% saved)

regimes27.0ms (0.2%)

Memory

-26.4MiB live, 25.7MiB allocated; 22ms collecting garbage

Counts

2 → 2

Calls

Call 1

Inputs

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))

Outputs

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))

(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc))))))

Calls

7 calls:

14.0ms	(/.f64 t l)
2.0ms	(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))
2.0ms	(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))
2.0ms	(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))
2.0ms	(pow.f64 (/.f64 t l) #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
57.0%	2	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
57.0%	2	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
57.0%	2	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
57.0%	2	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
57.0%	2	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
57.0%	2	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`
57.1%	2	`(/.f64 t l)`

Compiler

Compiled 78 to 75 computations (3.8% saved)

regimes26.0ms (0.2%)

Memory

-0.9MiB live, 45.5MiB allocated; 3ms collecting garbage

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))

Outputs
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))

Calls

14 calls:

3.0ms	t
2.0ms	l
2.0ms	Om
2.0ms	Omc
2.0ms	(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))

Results

Accuracy	Segments	Branch
49.6%	1	`(pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))`
49.6%	1	`(/.f64 Om Omc)`
49.6%	1	`Om`
49.6%	1	`(-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64)))`
49.6%	1	`Omc`
49.6%	1	`l`
49.6%	1	`t`
49.6%	1	`(pow.f64 (/.f64 t l) #s(literal 2 binary64))`
49.6%	1	`(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))`
49.6%	1	`(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))`
49.6%	1	`(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))`
49.6%	1	`(sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))`
49.6%	1	`(asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64)))))))`
49.6%	1	`(/.f64 t l)`

Compiler

Compiled 97 to 112 computations (-15.5% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.091128699621896e-146	1.740558318033079e-145

Compiler

Compiled 22 to 23 computations (-4.5% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	3.1894256567822416e-116	1.0822968449166626e-113

Compiler

Compiled 22 to 23 computations (-4.5% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.091128699621896e-146	1.740558318033079e-145

Compiler

Compiled 22 to 23 computations (-4.5% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.091128699621896e-146	1.740558318033079e-145

Compiler

Compiled 22 to 23 computations (-4.5% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	3.972786574423633e-11	1.8406534893692503e-7

Compiler

Compiled 22 to 23 computations (-4.5% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.4929516287520305	1.515735155787847

Compiler

Compiled 22 to 23 computations (-4.5% saved)

bsearch9.0ms (0.1%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
8.0ms	1.330411610090778e+240	1.5161552287737267e+240

Samples

6.0ms

96×

valid

Compiler

Compiled 160 to 125 computations (21.9% saved)

Precisions

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

ival-div: 1.0ms (26.2% of total)

ival-mult: 1.0ms (26.2% of total)

ival-pow2: 1.0ms (26.2% of total)

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

adjust: 0.0ms (0% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
2.0ms	1.330411610090778e+240	1.5161552287737267e+240

Samples

1.0ms

32×

valid

Compiler

Compiled 172 to 131 computations (23.8% saved)

Precisions

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

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

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

adjust: 0.0ms (0% of total)

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

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

simplify52.0ms (0.3%)

Memory

-12.3MiB live, 80.0MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	129	803
1	224	803
2	681	794
3	3848	794

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 8997827589086393/224945689727159819140526925384299092943484855915095831655037778630591879033574393515952034305194542857496045531676044756160413302774714984450425759043258192756736 binary64)) (asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))) #s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 554533938824163/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) (asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l))) #s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 8997827589086393/224945689727159819140526925384299092943484855915095831655037778630591879033574393515952034305194542857496045531676044756160413302774714984450425759043258192756736 binary64)) (asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 #s(approx ( 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t))) #s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 8997827589086393/224945689727159819140526925384299092943484855915095831655037778630591879033574393515952034305194542857496045531676044756160413302774714984450425759043258192756736 binary64)) (asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 #s(approx ( 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t))) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 7737125245533627/154742504910672534362390528 binary64)) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64))))) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64))))) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))
(if (<=.f64 (/.f64 t l) #s(literal 1449999999999999992460678196288629153054020930222251832223387052753289011020174947123066913981252566629499979477761704400760581292442970358410575888164338643648836751836661491932116579591574117208504300150387150920068806070988869032355037184 binary64)) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))))))
(if (<=.f64 (/.f64 t l) #s(literal 1449999999999999992460678196288629153054020930222251832223387052753289011020174947123066913981252566629499979477761704400760581292442970358410575888164338643648836751836661491932116579591574117208504300150387150920068806070988869032355037184 binary64)) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))))) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))

Outputs
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 8997827589086393/224945689727159819140526925384299092943484855915095831655037778630591879033574393515952034305194542857496045531676044756160413302774714984450425759043258192756736 binary64)) (asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) t))) #s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 554533938824163/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) (asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2))))) (.f64 #s(approx (+ ( (/ (sqrt 1/2) t) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) (* (* (/ (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (sqrt 1/2)) (sqrt (- 1 (/ (* Om Om) (* Omc Omc))))) -1/8)) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc)))) t)) l))) #s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 8997827589086393/224945689727159819140526925384299092943484855915095831655037778630591879033574393515952034305194542857496045531676044756160413302774714984450425759043258192756736 binary64)) (asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 #s(approx ( 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t))) #s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (sqrt.f64 (/.f64 #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 8997827589086393/224945689727159819140526925384299092943484855915095831655037778630591879033574393515952034305194542857496045531676044756160413302774714984450425759043258192756736 binary64)) (asin.f64 #s(approx (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2))))) (/.f64 (.f64 l (sqrt.f64 #s(approx ( 1/2 (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1/2 binary64)))) t))) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 7737125245533627/154742504910672534362390528 binary64)) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64))))) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (ratio-square-sum.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)))))))
(if (<=.f64 (asin.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 Om Omc) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (/.f64 t l) #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 ( 2 (pow (/ t l) 2)))) (.f64 #s(approx (/ ( (* l l) (- 1 (/ (* Om Om) (* Omc Omc)))) (* t t)) (ratio-of-squares.f64 l t)) #s(literal 1/2 binary64))))) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))))
#s(approx (asin (sqrt (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))))) (asin.f64 (/.f64 #s(approx (sqrt (- 1 (/ (* Om Om) (* Omc Omc)))) #s(literal 1 binary64)) #s(approx (sqrt (+ (* (/ (* t t) (* l l)) 2) 1)) (+.f64 (ratio-of-squares.f64 t l) #s(literal 1 binary64))))))
(if (<=.f64 (/.f64 t l) #s(literal 1449999999999999992460678196288629153054020930222251832223387052753289011020174947123066913981252566629499979477761704400760581292442970358410575888164338643648836751836661491932116579591574117208504300150387150920068806070988869032355037184 binary64)) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 Om Omc))))) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))))))
(if (<=.f64 (/.f64 t l) #s(literal 1449999999999999992460678196288629153054020930222251832223387052753289011020174947123066913981252566629499979477761704400760581292442970358410575888164338643648836751836661491932116579591574117208504300150387150920068806070988869032355037184 binary64)) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64))))) (asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) (neg.f64 #s(approx (/ (/ (* Om Om) (* Omc Omc)) (+ (* (/ (* t t) (* l l)) 2) 1)) (ratio-of-squares.f64 Om Omc)))))))
(asin.f64 (sqrt.f64 #s(approx (/ (- 1 (pow (/ Om Omc) 2)) (+ 1 (* 2 (pow (/ t l) 2)))) #s(approx (- 1 (/ (* Om Om) (* Omc Omc))) #s(literal 1 binary64)))))

derivations258.0ms (1.6%)

Memory

11.4MiB live, 340.8MiB allocated; 34ms collecting garbage

Stop Event

1×

fuel

Samples

37.0ms	953×	0	valid
3.0ms	71×	0	invalid

Compiler

Compiled 837 to 132 computations (84.2% saved)

Precisions

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

ival-mult: 13.0ms (62.5% of total)

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

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

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

adjust: 0.0ms (0% of total)

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

preprocess3.1s (19.1%)

Memory

-97.8MiB live, 3 615.1MiB allocated; 1.6s collecting garbage

Remove

(abs Omc)

(abs Om)

Samples

2.2s	36 775×	0	valid
97.0ms	2 393×	0	invalid

Compiler

Compiled 2 780 to 860 computations (69.1% saved)

Precisions

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

ival-mult: 1.0s (71.1% of total)

ival-div: 295.0ms (20% of total)

ival-add: 87.0ms (5.9% of total)

ival-true: 21.0ms (1.4% of total)

ival-assert: 14.0ms (1% of total)

adjust: 9.0ms (0.6% of total)

end0.0ms (0%)

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

start0.0ms (0%)

analyze480.0ms (3%)

sample3.9s (24.3%)

explain271.0ms (1.7%)

preprocess100.0ms (0.6%)

eval0.0ms (0%)

prune1.0ms (0%)

series58.0ms (0.4%)

rewrite103.0ms (0.6%)

eval220.0ms (1.4%)

prune433.0ms (2.7%)

series153.0ms (0.9%)

rewrite275.0ms (1.7%)

eval1.5s (9%)

prune660.0ms (4.1%)

series149.0ms (0.9%)

rewrite254.0ms (1.6%)

eval999.0ms (6.2%)

prune432.0ms (2.7%)

series83.0ms (0.5%)

rewrite233.0ms (1.4%)

eval1.7s (10.5%)

prune401.0ms (2.5%)

regimes149.0ms (0.9%)

regimes34.0ms (0.2%)

regimes30.0ms (0.2%)

regimes23.0ms (0.1%)

regimes39.0ms (0.2%)

regimes14.0ms (0.1%)

regimes27.0ms (0.2%)

regimes22.0ms (0.1%)

regimes27.0ms (0.2%)

regimes26.0ms (0.2%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch9.0ms (0.1%)

bsearch2.0ms (0%)

simplify52.0ms (0.3%)

derivations258.0ms (1.6%)

preprocess3.1s (19.1%)

end0.0ms (0%)

Profiling