Metrics for Spherical law of cosines

start0.0ms (0%)

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

analyze1.1s (7.4%)

Memory

29.6MiB live, 647.8MiB allocated; 188ms 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
0%	0%	99.8%	0.2%	0%	0%	0%	9
0%	0%	99.8%	0.2%	0%	0%	0%	10
1.6%	1.6%	98.2%	0.2%	0%	0%	0%	11
1.6%	1.6%	98.2%	0.2%	0%	0%	0%	12

Compiler

Compiled 21 to 19 computations (9.5% saved)

sample5.9s (38.1%)

Memory

-23.1MiB live, 4 040.7MiB allocated; 2.2s collecting garbage

Samples

4.6s	6 315×	1	valid
504.0ms	1 815×	0	valid
114.0ms	92×	2	valid
90.0ms	34×	3	valid

Precisions

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

ival-cos: 2.4s (48.7% of total)

ival-sin: 1.1s (23.5% of total)

ival-mult!: 467.0ms (9.6% of total)

ival-acos: 455.0ms (9.3% of total)

adjust: 317.0ms (6.5% of total)

ival-add!: 70.0ms (1.4% of total)

ival-sub!: 41.0ms (0.8% of total)

Bogosity

preprocess75.0ms (0.5%)

Memory

-28.2MiB live, 60.2MiB allocated; 28ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	130	412
1	479	408
2	3787	408

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	69.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

Symmetry

(negabs R)

(sort lambda1 lambda2)

(sort phi1 phi2)

Compiler

Compiled 34 to 34 computations (0% saved)

series41.0ms (0.3%)

Memory

20.9MiB live, 66.6MiB allocated; 5ms collecting garbage

Counts

17 → 106

Calls

Call 1

Inputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R

Outputs
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))))
#s(approx R #s(hole binary64 R))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (sin phi2))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow phi1 2) (cos phi2))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow phi1 2) (cos phi2))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* (sin phi1) (sin phi2))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (* (cos phi1) (cos phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (sin phi1))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow phi2 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))

Calls

15 calls:

Time	Variable		Point	Expression
7.0ms	phi1	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (cos (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 R)
4.0ms	phi2	@	0	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (cos (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 R)
3.0ms	lambda1	@	inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (cos (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 R)
3.0ms	phi1	@	inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (cos (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 R)
3.0ms	lambda2	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (cos (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 R)

rewrite623.0ms (4%)

Memory

-15.8MiB live, 651.0MiB allocated; 117ms collecting garbage

Counts

123 → 113

Calls

Call 1

Inputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))))
#s(approx R #s(hole binary64 R))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (sin phi2))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow phi1 2) (cos phi2))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow phi1 2) (cos phi2))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* (sin phi1) (sin phi2))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (* (cos phi1) (cos phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (sin phi1))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow phi2 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))

Outputs
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 phi2)
(cos.f64 (neg.f64 phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (.f64 (.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (.f64 (.f64 lambda2 lambda2) lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (.f64 (.f64 lambda2 lambda2) lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
lambda1
lambda2
R

eval15.0ms (0.1%)

Memory: 39.4MiB live, 39.4MiB allocated; 0ms collecting garbage
Compiler: Compiled 1 527 to 624 computations (59.1% saved)

prune21.0ms (0.1%)

Memory

-3.7MiB live, 43.5MiB allocated; 2ms collecting garbage

Pruning

20 alts after pruning (20 fresh and 0 done)

	Pruned	Kept	Total
New	78	20	98
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	79	20	99

Accuracy

94.3%

Counts

99 → 20

Alt Table

Click to see full alt table

Status	Accuracy	Program
	69.1%	(.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
	69.1%	(.f64 (/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	69.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	69.3%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
▶	69.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	69.2%	(.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) R)
	53.4%	(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	94.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	53.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
	94.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
▶	30.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	40.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
▶	40.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
▶	42.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	42.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	94.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
▶	94.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	34.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
	34.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)

Compiler

Compiled 1 048 to 868 computations (17.2% saved)

series212.0ms (1.4%)

Memory

-26.8MiB live, 298.2MiB allocated; 48ms collecting garbage

Counts

55 → 434

Calls

Call 1

Inputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
R
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 phi1)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)

Outputs
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx R #s(hole binary64 R))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (* (cos lambda2) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* -1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda1 (+ (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* 1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* -1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda1 (+ (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* 1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (sin lambda1))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1))))) (+ (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))) (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))) (+ (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1))))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))))) (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))) (+ (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1))))) (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))) (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))) (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1))))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))))) (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))) (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (+ (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (+ (* lambda2 (+ (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* -1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda2 (+ (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* -1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))))))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (sin phi2))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow phi1 2) (cos phi2))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow phi1 2) (cos phi2))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/24 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* -1/2 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* 1/24 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/24 (sin (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* -1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* -1/2 (* phi1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* -1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* phi1 (+ (* -1/2 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* phi1 (+ (* -1/6 (sin phi2)) (* 1/6 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* phi1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* -1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* -1/2 (* phi1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* -1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* phi1 (+ (* -1/2 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* 1/6 (* phi1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* phi1 (* (cos phi2) (cos (* 1/2 (PI)))))) (* (cos phi2) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (* phi1 (+ (* -1 (* (cos phi2) (cos (* 1/2 (PI))))) (* -1/2 (* phi1 (* (cos phi2) (sin (* 1/2 (PI)))))))) (* (cos phi2) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (* phi1 (+ (* -1 (* (cos phi2) (cos (* 1/2 (PI))))) (* phi1 (+ (* -1/2 (* (cos phi2) (sin (* 1/2 (PI))))) (* 1/6 (* phi1 (* (cos phi2) (cos (* 1/2 (PI)))))))))) (* (cos phi2) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* phi1 (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (* -1 (cos (* 1/2 (PI)))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg phi1) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (neg phi1) (/ (PI) 2)) #s(hole binary64 (+ (* -1 phi1) (* 1/2 (PI)))))
#s(approx (neg phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI)))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI)))))))) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* phi1 (+ (* -1/6 (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* 1/6 (cos (+ phi2 (* 1/2 (PI))))))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI)))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI)))))))) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* 1/6 (cos (+ phi2 (* 1/2 (PI))))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* 1/2 (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* -1/2 (* phi1 (sin (+ phi2 (* 1/2 (PI)))))) (* 1/2 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* 1/2 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI))))))) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* 1/2 (* phi1 (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* 1/6 (cos (+ phi2 (* 1/2 (PI)))))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (* 2 (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (* 2 (sin (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (* 2 (sin (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (+ (* -1 (cos (+ phi2 (* 1/2 (PI))))) (* -1 (* phi1 (sin (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (* 2 (sin (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (+ (* -1 (cos (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (* -1 (sin (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* 1/6 (cos (+ phi2 (* 1/2 (PI)))))))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* -1 (* phi1 (cos (+ phi2 (* 1/2 (PI)))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* -1 (cos (+ phi2 (* 1/2 (PI))))) (* -1/2 (* phi1 (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* -1 (cos (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* 1/6 (* phi1 (cos (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (cos (+ phi2 (* 1/2 (PI))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1/2 (* phi1 (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/6 (* phi1 (cos (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (+ phi1 (+ phi2 (* 1/2 (PI))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* (sin phi1) (sin phi2))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (* (cos phi1) (cos phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) phi1))))
#s(approx (+ (neg phi1) (/ (PI) 2)) #s(hole binary64 (* -1 phi1)))
#s(approx (+ (neg phi1) (/ (PI) 2)) #s(hole binary64 (* phi1 (- (* 1/2 (/ (PI) phi1)) 1))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) phi1))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* phi1 (- (+ (* 1/2 (/ (PI) phi1)) (/ phi2 phi1)) 1))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (+ phi1 (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 phi1))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* phi1 (+ 1 (+ (* 1/2 (/ (PI) phi1)) (/ phi2 phi1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi1) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi1) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi1) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi1) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ (* -1 phi1) (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 phi1) (* 1/2 (PI))))))
#s(approx (+ (neg phi1) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1/2 (/ (PI) phi1)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI)))))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ (+ phi2 (* 1/2 (PI))) phi1)) 1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (sin phi1))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow phi2 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* -1/6 (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (* 1/2 (PI))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (* (cos phi1) (cos (* 1/2 (PI))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos phi1) (sin (* 1/2 (PI)))))) (* (cos phi1) (cos (* 1/2 (PI)))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos phi1) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos phi1) (cos (* 1/2 (PI)))))))) (* (cos phi1) (cos (* 1/2 (PI)))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* phi2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (sin (- (* 1/2 (PI)) phi1))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* -1/2 (* (pow phi2 2) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* (pow phi2 2) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi1))) (* 1/24 (* (pow phi2 2) (sin (- (* 1/2 (PI)) phi1)))))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* (pow phi2 2) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- (* 1/2 (PI)) phi1)))) (* 1/24 (sin (- (* 1/2 (PI)) phi1))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (sin phi1) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (sin phi1) (+ (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (sin phi1) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi1))))))))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1)))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi1))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1)))))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (* 1/2 (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))) (* 1/2 (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1)))))) (* 1/2 (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1)))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))) (* phi2 (+ (* 1/2 (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi1)))))) (* 1/2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (+ (cos (- (* 1/2 (PI)) phi1)) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (+ (cos (- (* 1/2 (PI)) phi1)) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi1))) (* phi2 (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi1)))))))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (- (* 1/2 (PI)) phi1))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (cos (- (* 1/2 (PI)) phi1))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (+ (cos (- (* 1/2 (PI)) phi1)) (* -1/2 (* phi2 (sin (- (* 1/2 (PI)) phi1)))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (+ (cos (- (* 1/2 (PI)) phi1)) (* phi2 (+ (* -1/2 (sin (- (* 1/2 (PI)) phi1))) (* -1/6 (* phi2 (cos (- (* 1/2 (PI)) phi1)))))))))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (- (* 1/2 (PI)) phi1)))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (- (+ phi2 (* 1/2 (PI))) phi1)))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (+ phi1 (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (cos (+ phi1 (* 1/2 (PI))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1/2 (* phi2 (sin (+ phi1 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/6 (* phi2 (cos (+ phi1 (* 1/2 (PI)))))))))))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 phi2))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 phi2))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* phi2 (- (+ 1 (* 1/2 (/ (PI) phi2))) (/ phi1 phi2)))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 phi2))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* phi2 (+ 1 (+ (* 1/2 (/ (PI) phi2)) (/ phi1 phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (* 1/2 (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2))))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (- (* 1/2 (PI)) phi1) phi2)) 1)))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (+ phi1 (* 1/2 (PI))) phi2)) 1)))))

Calls

15 calls:

Time	Variable		Point	Expression
38.0ms	phi2	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos lambda2) lambda2 (cos lambda1) lambda1 (* (sin lambda1) (sin lambda2)) (sin lambda1) (sin lambda2) R (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi2)) (+ (/ (PI) 2) phi2) (/ (PI) 2) (PI) 2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (sin (+ (neg phi1) (/ (PI) 2))) (+ (neg phi1) (/ (PI) 2)) (neg phi1) (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) (sin (- (+ (/ (PI) 2) phi2) phi1)) (- (+ (/ (PI) 2) phi2) phi1) (sin (+ (+ (/ (PI) 2) phi2) phi1)) (+ (+ (/ (PI) 2) phi2) phi1))
21.0ms	phi2	@	0	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos lambda2) lambda2 (cos lambda1) lambda1 (* (sin lambda1) (sin lambda2)) (sin lambda1) (sin lambda2) R (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi2)) (+ (/ (PI) 2) phi2) (/ (PI) 2) (PI) 2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (sin (+ (neg phi1) (/ (PI) 2))) (+ (neg phi1) (/ (PI) 2)) (neg phi1) (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) (sin (- (+ (/ (PI) 2) phi2) phi1)) (- (+ (/ (PI) 2) phi2) phi1) (sin (+ (+ (/ (PI) 2) phi2) phi1)) (+ (+ (/ (PI) 2) phi2) phi1))
21.0ms	lambda1	@	inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos lambda2) lambda2 (cos lambda1) lambda1 (* (sin lambda1) (sin lambda2)) (sin lambda1) (sin lambda2) R (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi2)) (+ (/ (PI) 2) phi2) (/ (PI) 2) (PI) 2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (sin (+ (neg phi1) (/ (PI) 2))) (+ (neg phi1) (/ (PI) 2)) (neg phi1) (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) (sin (- (+ (/ (PI) 2) phi2) phi1)) (- (+ (/ (PI) 2) phi2) phi1) (sin (+ (+ (/ (PI) 2) phi2) phi1)) (+ (+ (/ (PI) 2) phi2) phi1))
15.0ms	phi2	@	inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos lambda2) lambda2 (cos lambda1) lambda1 (* (sin lambda1) (sin lambda2)) (sin lambda1) (sin lambda2) R (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi2)) (+ (/ (PI) 2) phi2) (/ (PI) 2) (PI) 2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (sin (+ (neg phi1) (/ (PI) 2))) (+ (neg phi1) (/ (PI) 2)) (neg phi1) (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) (sin (- (+ (/ (PI) 2) phi2) phi1)) (- (+ (/ (PI) 2) phi2) phi1) (sin (+ (+ (/ (PI) 2) phi2) phi1)) (+ (+ (/ (PI) 2) phi2) phi1))
13.0ms	phi1	@	inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos lambda2) lambda2 (cos lambda1) lambda1 (* (sin lambda1) (sin lambda2)) (sin lambda1) (sin lambda2) R (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi2)) (+ (/ (PI) 2) phi2) (/ (PI) 2) (PI) 2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (sin (+ (neg phi1) (/ (PI) 2))) (+ (neg phi1) (/ (PI) 2)) (neg phi1) (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) (sin (- (+ (/ (PI) 2) phi2) phi1)) (- (+ (/ (PI) 2) phi2) phi1) (sin (+ (+ (/ (PI) 2) phi2) phi1)) (+ (+ (/ (PI) 2) phi2) phi1))

rewrite1.2s (8%)

Memory

129.0MiB live, 1 101.9MiB allocated; 219ms collecting garbage

Counts

489 → 985

Calls

Call 1

Inputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
R
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 phi1)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx R #s(hole binary64 R))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (* (cos lambda2) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* -1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda1 (+ (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* 1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* -1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda1 (+ (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* 1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (sin lambda1))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1))))) (+ (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))) (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))) (+ (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1))))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))))) (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))) (+ (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1))))) (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))) (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))) (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1))))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))))) (* (cos phi2) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi1)))))) (* (cos lambda1) (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (+ (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (+ (* lambda2 (+ (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* -1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda2 (+ (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* -1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))))))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi1)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (sin phi2))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow phi1 2) (cos phi2))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow phi1 2) (cos phi2))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/24 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* -1/2 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* 1/24 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/24 (sin (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* -1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* -1/2 (* phi1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* -1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* phi1 (+ (* -1/2 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* phi1 (+ (* -1/6 (sin phi2)) (* 1/6 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* phi1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* -1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* -1/2 (* phi1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* -1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* phi1 (+ (* -1/2 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* 1/6 (* phi1 (* (cos phi2) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* phi1 (* (cos phi2) (cos (* 1/2 (PI)))))) (* (cos phi2) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (* phi1 (+ (* -1 (* (cos phi2) (cos (* 1/2 (PI))))) (* -1/2 (* phi1 (* (cos phi2) (sin (* 1/2 (PI)))))))) (* (cos phi2) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (* phi1 (+ (* -1 (* (cos phi2) (cos (* 1/2 (PI))))) (* phi1 (+ (* -1/2 (* (cos phi2) (sin (* 1/2 (PI))))) (* 1/6 (* phi1 (* (cos phi2) (cos (* 1/2 (PI)))))))))) (* (cos phi2) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* phi1 (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (* -1 (cos (* 1/2 (PI)))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg phi1) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (neg phi1) (/ (PI) 2)) #s(hole binary64 (+ (* -1 phi1) (* 1/2 (PI)))))
#s(approx (neg phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI)))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI)))))))) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* phi1 (+ (* -1/6 (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* 1/6 (cos (+ phi2 (* 1/2 (PI))))))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI)))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI)))))))) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* 1/6 (cos (+ phi2 (* 1/2 (PI))))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* 1/2 (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* -1/2 (* phi1 (sin (+ phi2 (* 1/2 (PI)))))) (* 1/2 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* 1/2 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI))))))) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* 1/2 (* phi1 (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* 1/6 (cos (+ phi2 (* 1/2 (PI)))))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (* 2 (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (* 2 (sin (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1 (cos (+ phi2 (* 1/2 (PI))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (* 2 (sin (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (+ (* -1 (cos (+ phi2 (* 1/2 (PI))))) (* -1 (* phi1 (sin (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (* 2 (sin (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (+ (* -1 (cos (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (* -1 (sin (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* 1/6 (cos (+ phi2 (* 1/2 (PI)))))))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* -1 (* phi1 (cos (+ phi2 (* 1/2 (PI)))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* -1 (cos (+ phi2 (* 1/2 (PI))))) (* -1/2 (* phi1 (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* -1 (cos (+ phi2 (* 1/2 (PI))))) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* 1/6 (* phi1 (cos (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (cos (+ phi2 (* 1/2 (PI))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1/2 (* phi1 (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/6 (* phi1 (cos (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (+ phi1 (+ phi2 (* 1/2 (PI))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* (sin phi1) (sin phi2))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (* (cos phi1) (cos phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- (* 1/2 (PI)) phi1)))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) phi1))))
#s(approx (+ (neg phi1) (/ (PI) 2)) #s(hole binary64 (* -1 phi1)))
#s(approx (+ (neg phi1) (/ (PI) 2)) #s(hole binary64 (* phi1 (- (* 1/2 (/ (PI) phi1)) 1))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) phi1)))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) phi1))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* phi1 (- (+ (* 1/2 (/ (PI) phi1)) (/ phi2 phi1)) 1))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (+ phi1 (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 phi1))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* phi1 (+ 1 (+ (* 1/2 (/ (PI) phi1)) (/ phi2 phi1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi1) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi1) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi1) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi1) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ (* -1 phi1) (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi1) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 phi1) (* 1/2 (PI))))))
#s(approx (+ (neg phi1) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1/2 (/ (PI) phi1)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (+ phi2 (+ (* -1 phi1) (* 1/2 (PI)))))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ (+ phi2 (* 1/2 (PI))) phi1)) 1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (sin phi1))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) #s(hole binary64 (+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow phi2 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* -1/6 (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (* 1/2 (PI))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (* (cos phi1) (cos (* 1/2 (PI))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos phi1) (sin (* 1/2 (PI)))))) (* (cos phi1) (cos (* 1/2 (PI)))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos phi1) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos phi1) (cos (* 1/2 (PI)))))))) (* (cos phi1) (cos (* 1/2 (PI)))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* phi2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))))))))
#s(approx (* (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1))))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi1)))))))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (sin (- (* 1/2 (PI)) phi1))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* -1/2 (* (pow phi2 2) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* (pow phi2 2) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi1))) (* 1/24 (* (pow phi2 2) (sin (- (* 1/2 (PI)) phi1)))))))))
#s(approx (* (sin (+ (neg phi1) (/ (PI) 2))) (cos phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* (pow phi2 2) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- (* 1/2 (PI)) phi1)))) (* 1/24 (sin (- (* 1/2 (PI)) phi1))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (sin phi1) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (sin phi1) (+ (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (sin phi1) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi1))))))))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1)))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))) (* phi2 (+ (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi1))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1)))))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (* 1/2 (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))) (* 1/2 (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1)))))) (* 1/2 (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1)))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))) (* phi2 (+ (* 1/2 (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi1)))))) (* 1/2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi1)))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi1))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (+ (cos (- (* 1/2 (PI)) phi1)) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi1))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (+ (cos (- (* 1/2 (PI)) phi1)) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi1))) (* phi2 (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi1)))))))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (- (* 1/2 (PI)) phi1))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (cos (- (* 1/2 (PI)) phi1))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (+ (cos (- (* 1/2 (PI)) phi1)) (* -1/2 (* phi2 (sin (- (* 1/2 (PI)) phi1)))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi1)) (* phi2 (+ (cos (- (* 1/2 (PI)) phi1)) (* phi2 (+ (* -1/2 (sin (- (* 1/2 (PI)) phi1))) (* -1/6 (* phi2 (cos (- (* 1/2 (PI)) phi1)))))))))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (- (* 1/2 (PI)) phi1)))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (- (+ phi2 (* 1/2 (PI))) phi1)))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (+ phi1 (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (cos (+ phi1 (* 1/2 (PI))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1/2 (* phi2 (sin (+ phi1 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/6 (* phi2 (cos (+ phi1 (* 1/2 (PI)))))))))))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 phi2))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 phi2))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* phi2 (- (+ 1 (* 1/2 (/ (PI) phi2))) (/ phi1 phi2)))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 phi2))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* phi2 (+ 1 (+ (* 1/2 (/ (PI) phi2)) (/ phi1 phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) 2) #s(hole binary64 (* 1/2 (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi2) phi1)) (sin (+ (+ (/ (PI) 2) phi2) phi1))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2)))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2))))))
#s(approx (sin (- (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ phi1 (* -1 phi2))))))
#s(approx (- (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (- (* 1/2 (PI)) phi1) phi2)) 1)))))
#s(approx (sin (+ (+ (/ (PI) 2) phi2) phi1)) #s(hole binary64 (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))
#s(approx (+ (+ (/ (PI) 2) phi2) phi1) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (+ phi1 (* 1/2 (PI))) phi2)) 1)))))

Outputs
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (neg.f64 #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(+.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(fma.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(-.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi1)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))) (-.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(-.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi2)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)))) (-.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))))
(cos.f64 phi2)
(cos.f64 (neg.f64 phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(fma.f64 (cos.f64 phi2) #s(literal 1 binary64) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi2) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (.f64 (sin.f64 lambda2) #s(literal 0 binary64)) (.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(cos.f64 lambda2)
(cos.f64 (neg.f64 lambda2))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) #s(literal 0 binary64) (*.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
lambda2
(+.f64 (.f64 (sin.f64 lambda1) #s(literal 0 binary64)) (.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(cos.f64 lambda1)
(cos.f64 (neg.f64 lambda1))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) #s(literal 0 binary64) (*.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
lambda1
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 #s(literal 2 binary64)))
(sin.f64 lambda1)
(sin.f64 lambda2)
R
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (neg.f64 #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (.f64 (.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (.f64 (.f64 lambda2 lambda2) lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (.f64 (.f64 lambda2 lambda2) lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (neg.f64 #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(+.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(fma.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(-.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi2)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)))) (-.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))))
(cos.f64 phi2)
(cos.f64 (neg.f64 phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(fma.f64 (cos.f64 phi2) #s(literal 1 binary64) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi2) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)
(+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 phi2 phi2) phi2) (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (/.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 phi2 phi2) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) phi2))) (neg.f64 (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi2 phi2))) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 phi2 phi2 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (*.f64 (PI.f64) phi2) #s(literal 2 binary64)))))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (PI.f64)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (PI.f64) (neg.f64 #s(literal 2 binary64))))
(PI.f64)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) #s(literal 1 binary64))
(.f64 #s(literal 2 binary64) (.f64 (cosh.f64 (/.f64 (+.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64))) (cosh.f64 (/.f64 (-.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (neg.f64 #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(+.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(fma.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(-.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi1)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))) (-.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))
(+.f64 (/.f64 (neg.f64 (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)) (.f64 phi1 phi1))) (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)) (*.f64 phi1 phi1))))
(-.f64 (/.f64 (.f64 phi1 phi1) (-.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 phi1 phi1) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)) (*.f64 phi1 phi1)))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi1 phi1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 phi1 phi1) phi1)))) (neg.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)) (*.f64 phi1 phi1))))
(/.f64 (neg.f64 (-.f64 (.f64 phi1 phi1) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (-.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 phi1 phi1) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))))
(neg.f64 phi1)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (neg.f64 #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(+.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(fma.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 2 binary64) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))))
(.f64 #s(literal 2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1) (cos.f64 (-.f64 phi2 phi1))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
(+.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))))
(-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1) (cos.f64 (-.f64 phi2 phi1))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 0 binary64) (sin.f64 (-.f64 phi2 phi1))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (cos.f64 (+.f64 phi2 phi1)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (neg.f64 (-.f64 phi1 phi2)))
(cos.f64 (neg.f64 (-.f64 phi2 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(sin.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)))) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1))
(+.f64 phi2 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)
(-.f64 (/.f64 (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (.f64 phi1 phi1) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (*.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 phi2 phi1) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1))) (neg.f64 (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (*.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi2 phi1))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (cos.f64 (-.f64 phi2 phi1)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))
(cos.f64 (+.f64 phi2 phi1))
(cos.f64 (neg.f64 (+.f64 phi2 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi2 phi1)) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(sin.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (*.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)
(+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(-.f64 (/.f64 (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (.f64 phi1 phi1) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)))
(/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64))) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(/.f64 (-.f64 (.f64 phi1 phi1) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (+.f64 phi2 phi1) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64))) (fma.f64 phi1 phi1 (-.f64 (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))))

eval110.0ms (0.7%)

Memory: -32.7MiB live, 131.4MiB allocated; 60ms collecting garbage
Compiler: Compiled 8 749 to 3 166 computations (63.8% saved)

prune55.0ms (0.4%)

Memory

-3.7MiB live, 91.8MiB allocated; 17ms collecting garbage

Pruning

38 alts after pruning (35 fresh and 3 done)

	Pruned	Kept	Total
New	465	28	493
Fresh	8	7	15
Picked	2	3	5
Done	0	0	0
Total	475	38	513

Accuracy

94.4%

Counts

513 → 38

Alt Table

Click to see full alt table

Status	Accuracy	Program
	69.1%	(.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	69.1%	(.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
	69.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	53.2%	(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	94.0%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
▶	69.3%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
▶	19.1%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	30.6%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	30.0%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	69.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	40.1%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	40.4%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	42.8%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	42.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓	69.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	30.1%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	53.2%	(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
	40.1%	(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	53.4%	(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	94.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
	94.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
	94.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) R)
	69.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1))))) R)
	72.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	17.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	17.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64))) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓	30.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	19.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	30.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
▶	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	20.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)))) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	29.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
▶	42.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
▶	94.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
✓	94.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	93.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))))) R)
	34.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
	34.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)

Compiler

Compiled 2 330 to 1 809 computations (22.4% saved)

series173.0ms (1.1%)

Memory

6.4MiB live, 286.0MiB allocated; 28ms collecting garbage

Counts

62 → 506

Calls

Call 1

Inputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda1)
(cos.f64 lambda2)
R
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 phi2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))
(cos.f64 (-.f64 phi2 phi1))
(-.f64 phi2 phi1)
(*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)

Outputs
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx R #s(hole binary64 R))
#s(approx (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (* (cos lambda2) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow lambda1 2) (cos lambda2))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* -1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda1 (+ (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* 1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* -1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda1 (+ (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* 1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))) (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (/ (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (/ (* lambda1 (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))) (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (/ (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* lambda1 (+ (* -1/2 (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* 1/6 (/ (* lambda1 (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))))) (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (/ (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (/ (* lambda1 (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (/ (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* lambda1 (+ (* -1/2 (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* 1/6 (/ (* lambda1 (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (* (cos lambda1) (cos lambda2))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* -1/2 (* (pow lambda2 2) (cos lambda1))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow lambda2 2) (cos lambda1))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos lambda1))) (* 1/24 (cos lambda1)))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2))))) (+ (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))) (+ (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))))) (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))) (+ (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2))))) (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))))) (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (+ (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (+ (* lambda2 (+ (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* -1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda2 (+ (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* -1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (+ (/ (* lambda2 (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2))) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (/ (* lambda2 (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))) (/ (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))) (+ (* (sin phi1) (sin phi2)) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* -1/6 (/ (* lambda2 (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))) (/ (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))) (+ (* (sin phi1) (sin phi2)) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (/ (* lambda2 (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2))) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (/ (* lambda2 (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))) (/ (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* -1/6 (/ (* lambda2 (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))) (/ (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (+ lambda1 (* -1 lambda2))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (+ lambda1 (* -1 lambda2))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (+ lambda1 (* -1 lambda2))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (+ lambda1 (* -1 lambda2))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (sin phi2))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow phi1 2) (cos phi2))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow phi1 2) (cos phi2))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* 1/24 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (sin (- (* 1/2 (PI)) phi2))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* -1/2 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* (pow phi1 2) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi2))) (* 1/24 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2)))))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* (pow phi1 2) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2)))) (* 1/24 (sin (- (* 1/2 (PI)) phi2))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (sin phi2) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (sin phi2) (+ (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (sin phi2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2)))))) (* phi1 (+ (* -1/6 (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi2))))))))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2)))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi2))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2)))))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (* 1/2 (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))) (* 1/2 (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))) (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2)))))) (* 1/2 (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2)))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))) (* phi1 (+ (* 1/2 (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2)))) (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (+ (cos (- (* 1/2 (PI)) phi2)) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (+ (cos (- (* 1/2 (PI)) phi2)) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi2))) (* phi1 (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi2)))))))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (- (* 1/2 (PI)) phi2))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (cos (- (* 1/2 (PI)) phi2))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (+ (cos (- (* 1/2 (PI)) phi2)) (* -1/2 (* phi1 (sin (- (* 1/2 (PI)) phi2)))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (+ (cos (- (* 1/2 (PI)) phi2)) (* phi1 (+ (* -1/2 (sin (- (* 1/2 (PI)) phi2))) (* -1/6 (* phi1 (cos (- (* 1/2 (PI)) phi2)))))))))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (- (* 1/2 (PI)) phi2)))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (- (+ phi1 (* 1/2 (PI))) phi2)))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (cos (+ phi2 (* 1/2 (PI))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1/2 (* phi1 (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/6 (* phi1 (cos (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (+ phi1 (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (- (+ (* -1/6 (* phi1 (sin phi2))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (pow phi1 2) (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2)))))) (* 1/4 (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2)))))))) (sin phi2)) (+ (* -1/6 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (* 1/120 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1/72 (* (cos phi2) (sin phi2))) (+ (* -1/120 (* (cos phi2) (sin phi2))) (+ (* -1/360 (* (cos phi2) (sin phi2))) (* -1/2520 (* (cos phi2) (sin phi2))))))) (* 1/4 (+ (* 1/2520 (* (cos phi2) (sin phi2))) (+ (* 1/360 (* (cos phi2) (sin phi2))) (+ (* 1/120 (* (cos phi2) (sin phi2))) (* 1/72 (* (cos phi2) (sin phi2))))))))) (sin phi2)) (+ (* -1/6 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2)))))) (* 1/4 (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2)))))))) (sin phi2)) (+ (* -1/6 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (* 1/120 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))) (+ (* -1/5040 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))) (* 1/120 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2)))))) (* 1/4 (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2)))))))) (sin phi2))) (+ (* -1/6 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (* 1/120 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (- (+ (* 1/2 (cos phi2)) (* (pow phi1 2) (- (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2))))))) (* -1/2 (cos phi2)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (- (+ (* 1/2 (cos phi2)) (* (pow phi1 2) (- (+ (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (* (pow phi1 2) (- (* 1/4 (/ (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2))))) (sin phi2))) (+ (* -1/6 (- (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2)))))) (+ (* 1/120 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2))))) (sin phi2)))))))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2))))))) (* -1/2 (cos phi2)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (- (+ (* 1/2 (cos phi2)) (* (pow phi1 2) (- (+ (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (* (pow phi1 2) (- (+ (* 1/4 (/ (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2))))) (sin phi2))) (* (pow phi1 2) (- (* 1/4 (/ (+ (* -1/72 (* (cos phi2) (sin phi2))) (+ (* -1/120 (* (cos phi2) (sin phi2))) (+ (* -1/360 (* (cos phi2) (sin phi2))) (* -1/2520 (* (cos phi2) (sin phi2)))))) (sin phi2))) (+ (* -1/6 (- (* 1/4 (/ (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2))))) (sin phi2))) (+ (* -1/6 (- (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2)))))) (+ (* 1/120 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2))))) (sin phi2))))))) (+ (* -1/5040 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* 1/120 (- (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2)))))) (* 1/4 (/ (+ (* 1/2520 (* (cos phi2) (sin phi2))) (+ (* 1/360 (* (cos phi2) (sin phi2))) (+ (* 1/120 (* (cos phi2) (sin phi2))) (* 1/72 (* (cos phi2) (sin phi2)))))) (sin phi2))))))))) (+ (* -1/6 (- (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2)))))) (+ (* 1/120 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2))))) (sin phi2)))))))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2))))))) (* -1/2 (cos phi2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (* phi1 (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (* phi1 (- (+ (* 1/2 (* (cos phi2) (sin phi2))) (* (pow phi1 2) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))))))) (* -1/2 (* (cos phi2) (sin phi2)))))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (* phi1 (- (+ (* 1/2 (* (cos phi2) (sin phi2))) (* (pow phi1 2) (- (+ (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* (pow phi1 2) (- (* 1/4 (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2)))))) (* 1/4 (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2))))))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))))))) (* -1/2 (* (cos phi2) (sin phi2)))))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (* phi1 (- (+ (* 1/2 (* (cos phi2) (sin phi2))) (* (pow phi1 2) (- (+ (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* (pow phi1 2) (- (+ (* 1/4 (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2)))))) (* (pow phi1 2) (- (* 1/4 (+ (* -1/72 (* (cos phi2) (sin phi2))) (+ (* -1/120 (* (cos phi2) (sin phi2))) (+ (* -1/360 (* (cos phi2) (sin phi2))) (* -1/2520 (* (cos phi2) (sin phi2))))))) (* 1/4 (+ (* 1/2520 (* (cos phi2) (sin phi2))) (+ (* 1/360 (* (cos phi2) (sin phi2))) (+ (* 1/120 (* (cos phi2) (sin phi2))) (* 1/72 (* (cos phi2) (sin phi2)))))))))) (* 1/4 (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2))))))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))))))) (* -1/2 (* (cos phi2) (sin phi2)))))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos phi2) 2))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi2) 2)) (* 1/2 (* phi1 (* (cos phi2) (sin phi2)))))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi2) 2)) (* phi1 (+ (* 1/4 (* phi1 (+ (* -1 (pow (cos phi2) 2)) (pow (sin phi2) 2)))) (* 1/2 (* (cos phi2) (sin phi2))))))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi2) 2)) (* phi1 (+ (* 1/2 (* (cos phi2) (sin phi2))) (* phi1 (+ (* 1/4 (* phi1 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))))) (* 1/4 (+ (* -1 (pow (cos phi2) 2)) (pow (sin phi2) 2))))))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos phi2))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi2)) (* 1/2 (* phi1 (sin phi2))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/4 (* phi1 (cos phi2))) (* 1/2 (sin phi2)))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* 1/2 (sin phi2)) (* phi1 (+ (* -1/4 (cos phi2)) (* -1/12 (* phi1 (sin phi2))))))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (cos phi2)))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* phi1 (sin phi2)))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))))
#s(approx (- phi2 phi1) #s(hole binary64 phi2))
#s(approx (- phi2 phi1) #s(hole binary64 (+ phi2 (* -1 phi1))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos phi2) 2))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* -1/2 (* phi1 (* (cos phi2) (sin phi2)))) (* 1/4 (pow (cos phi2) 2)))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi2) 2)) (* phi1 (+ (* -1/2 (* (cos phi2) (sin phi2))) (* 1/4 (* phi1 (+ (* -1 (pow (cos phi2) 2)) (pow (sin phi2) 2)))))))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi2) 2)) (* phi1 (+ (* -1/2 (* (cos phi2) (sin phi2))) (* phi1 (+ (* 1/4 (* phi1 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* -1 (pow (cos phi2) 2)) (pow (sin phi2) 2))))))))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos phi2))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* -1/2 (* phi1 (sin phi2))) (* 1/2 (cos phi2)))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/4 (* phi1 (cos phi2))))))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* phi1 (+ (* -1/4 (cos phi2)) (* 1/12 (* phi1 (sin phi2))))))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (cos phi2)))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* -1 (* phi1 (sin phi2))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))))
#s(approx (+ phi2 phi1) #s(hole binary64 phi2))
#s(approx (+ phi2 phi1) #s(hole binary64 (+ phi1 phi2)))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* (sin phi1) (sin phi2))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (* (cos phi1) (cos phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (- (+ phi1 (* 1/2 (PI))) phi2))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 phi1))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* phi1 (- (+ 1 (* 1/2 (/ (PI) phi1))) (/ phi2 phi1)))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 phi1))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* phi1 (+ 1 (* 1/2 (/ (PI) phi1))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (+ phi1 (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 phi1))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* phi1 (+ 1 (+ (* 1/2 (/ (PI) phi1)) (/ phi2 phi1))))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))) (* (sin phi1) (sin phi2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (- phi2 phi1)) 2))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (- phi2 phi1)))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (cos (- phi2 phi1))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (- phi2 phi1) #s(hole binary64 (* phi1 (- (/ phi2 phi1) 1))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (+ phi1 phi2)) 2))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (+ phi1 phi2)))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (cos (+ phi1 phi2))))
#s(approx (+ phi2 phi1) #s(hole binary64 phi1))
#s(approx (+ phi2 phi1) #s(hole binary64 (* phi1 (+ 1 (/ phi2 phi1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (* 1/2 (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1))))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ (- (* 1/2 (PI)) phi2) phi1)) 1)))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1/2 (/ (PI) phi1)) 1)))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ (+ phi2 (* 1/2 (PI))) phi1)) 1)))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2)))) (* (sin phi1) (sin phi2))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2))) (* (sin phi1) (sin phi2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2)))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (+ phi2 (* -1 phi1))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (cos (+ phi2 (* -1 phi1)))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (- phi2 (* -1 phi1))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (cos (- phi2 (* -1 phi1)))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (sin phi1))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow phi2 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* 1/6 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* 1/6 (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (cos phi1) (sin (* 1/2 (PI))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (* phi2 (* (cos phi1) (cos (* 1/2 (PI)))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos phi1) (cos (* 1/2 (PI))))) (* -1/2 (* phi2 (* (cos phi1) (sin (* 1/2 (PI)))))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos phi1) (cos (* 1/2 (PI))))) (* phi2 (+ (* -1/2 (* (cos phi1) (sin (* 1/2 (PI))))) (* 1/6 (* phi2 (* (cos phi1) (cos (* 1/2 (PI)))))))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* phi2 (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (* -1 (cos (* 1/2 (PI)))) (* phi2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* phi2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (+ (* -1 phi2) (* 1/2 (PI)))))
#s(approx (neg phi2) #s(hole binary64 (* -1 phi2)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI)))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI)))))))) (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* 1/6 (cos (+ phi1 (* 1/2 (PI))))))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI)))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI)))))))) (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* 1/6 (cos (+ phi1 (* 1/2 (PI))))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (sin (+ phi1 (* 1/2 (PI))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* 1/2 (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI)))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* -1/2 (* phi2 (sin (+ phi1 (* 1/2 (PI)))))) (* 1/2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI))))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* 1/2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI))))))) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* 1/2 (* phi2 (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* 1/6 (cos (+ phi1 (* 1/2 (PI)))))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (* 2 (sin (+ phi1 (* 1/2 (PI)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (* 2 (sin (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (* 2 (sin (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (+ (* -1 (cos (+ phi1 (* 1/2 (PI))))) (* -1 (* phi2 (sin (+ phi1 (* 1/2 (PI))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (* 2 (sin (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (+ (* -1 (cos (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (* -1 (sin (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* 1/6 (cos (+ phi1 (* 1/2 (PI)))))))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (+ phi1 (* 1/2 (PI))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* -1 (* phi2 (cos (+ phi1 (* 1/2 (PI)))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* -1 (cos (+ phi1 (* 1/2 (PI))))) (* -1/2 (* phi2 (sin (+ phi1 (* 1/2 (PI)))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* -1 (cos (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* 1/6 (* phi2 (cos (+ phi1 (* 1/2 (PI)))))))))))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (+ phi1 (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (cos (+ phi1 (* 1/2 (PI))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1/2 (* phi2 (sin (+ phi1 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/6 (* phi2 (cos (+ phi1 (* 1/2 (PI)))))))))))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (* phi2 (sin phi1)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ (/ (* phi2 (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1)))))) (sin phi1)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ (* phi2 (+ (* phi2 (- (+ (sin phi1) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2))))) (sin phi1))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1)))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ (* phi2 (+ (* phi2 (- (+ (sin phi1) (+ (* phi2 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* 1/3 (* (cos (neg phi1)) (sin (neg phi1)))) (* (cos (neg phi1)) (sin (neg phi1))))) (* 1/4 (+ (* 1/3 (* (cos phi1) (sin phi1))) (* (cos phi1) (sin phi1)))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2))))) (sin phi1)))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1)))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (* phi2 (sin phi1)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (+ (/ (* phi2 (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1)))))) (sin phi1)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (+ (* phi2 (+ (* phi2 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1)))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (+ (* phi2 (+ (* phi2 (- (+ (* phi2 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* 1/3 (* (cos (neg phi1)) (sin (neg phi1)))) (* (cos (neg phi1)) (sin (neg phi1))))) (* 1/4 (+ (* 1/3 (* (cos phi1) (sin phi1))) (* (cos phi1) (sin phi1)))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2))))) (sin phi1))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1)))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2))) (* phi2 (sin phi1)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (+ (* 1/4 (/ (pow (cos (neg phi1)) 2) (sin phi1))) (* phi2 (- (* -1/2 (/ (* (cos (neg phi1)) (sin (neg phi1))) (sin phi1))) (* -1/2 (cos phi1))))) (* 1/4 (/ (pow (cos phi1) 2) (sin phi1)))) phi2)))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (+ (* 1/4 (/ (pow (cos (neg phi1)) 2) (sin phi1))) (* phi2 (- (+ (* -1/2 (/ (* (cos (neg phi1)) (sin (neg phi1))) (sin phi1))) (* phi2 (- (* 1/4 (/ (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2)) (sin phi1))) (+ (* -1/6 (/ (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2))) (sin phi1))) (* 1/4 (/ (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2)) (sin phi1))))))) (* -1/2 (cos phi1))))) (* 1/4 (/ (pow (cos phi1) 2) (sin phi1)))) phi2)))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (+ (* 1/4 (/ (pow (cos (neg phi1)) 2) (sin phi1))) (* phi2 (- (+ (* -1/2 (/ (* (cos (neg phi1)) (sin (neg phi1))) (sin phi1))) (* phi2 (- (+ (* 1/4 (/ (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2)) (sin phi1))) (* phi2 (- (* 1/4 (/ (+ (* 1/3 (* (cos (neg phi1)) (sin (neg phi1)))) (* (cos (neg phi1)) (sin (neg phi1)))) (sin phi1))) (+ (* -1/6 (- (* -1/2 (/ (* (cos (neg phi1)) (sin (neg phi1))) (sin phi1))) (* -1/2 (cos phi1)))) (* 1/4 (/ (+ (* 1/3 (* (cos phi1) (sin phi1))) (* (cos phi1) (sin phi1))) (sin phi1))))))) (+ (* -1/6 (/ (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2))) (sin phi1))) (* 1/4 (/ (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2)) (sin phi1))))))) (* -1/2 (cos phi1))))) (* 1/4 (/ (pow (cos phi1) 2) (sin phi1)))) phi2)))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (+ (* 1/4 (pow (cos (neg phi1)) 2)) (* phi2 (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1)))))) (* 1/4 (pow (cos phi1) 2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (+ (* 1/4 (pow (cos (neg phi1)) 2)) (* phi2 (- (+ (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* phi2 (- (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2)))))) (* -1/2 (* (cos phi1) (sin phi1)))))) (* 1/4 (pow (cos phi1) 2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (+ (* 1/4 (pow (cos (neg phi1)) 2)) (* phi2 (- (+ (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* phi2 (- (+ (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* phi2 (- (* 1/4 (+ (* 1/3 (* (cos (neg phi1)) (sin (neg phi1)))) (* (cos (neg phi1)) (sin (neg phi1))))) (* 1/4 (+ (* 1/3 (* (cos phi1) (sin phi1))) (* (cos phi1) (sin phi1))))))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2)))))) (* -1/2 (* (cos phi1) (sin phi1)))))) (* 1/4 (pow (cos phi1) 2)))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (neg phi1)) 2))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* -1/2 (* phi2 (* (cos (neg phi1)) (sin (neg phi1))))) (* 1/4 (pow (cos (neg phi1)) 2)))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos (neg phi1)) 2)) (* phi2 (+ (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* 1/4 (* phi2 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2)))))))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos (neg phi1)) 2)) (* phi2 (+ (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* phi2 (+ (* 1/4 (* phi2 (+ (* 1/3 (* (cos (neg phi1)) (sin (neg phi1)))) (* (cos (neg phi1)) (sin (neg phi1)))))) (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))))))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (neg phi1)))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* -1/2 (* phi2 (sin (neg phi1)))) (* 1/2 (cos (neg phi1))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos (neg phi1))) (* phi2 (+ (* -1/2 (sin (neg phi1))) (* -1/4 (* phi2 (cos (neg phi1)))))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos (neg phi1))) (* phi2 (+ (* -1/2 (sin (neg phi1))) (* phi2 (+ (* -1/4 (cos (neg phi1))) (* 1/12 (* phi2 (sin (neg phi1)))))))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (cos (neg phi1))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))))
#s(approx (- phi2 phi1) #s(hole binary64 (- phi2 phi1)))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos phi1) 2))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* -1/2 (* phi2 (* (cos phi1) (sin phi1)))) (* 1/4 (pow (cos phi1) 2)))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi1) 2)) (* phi2 (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/4 (* phi2 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2)))))))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi1) 2)) (* phi2 (+ (* -1/2 (* (cos phi1) (sin phi1))) (* phi2 (+ (* 1/4 (* phi2 (+ (* 1/3 (* (cos phi1) (sin phi1))) (* (cos phi1) (sin phi1))))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2))))))))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos phi1))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (cos phi1)))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* -1/4 (* phi2 (cos phi1))))))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (cos phi1)) (* 1/12 (* phi2 (sin phi1))))))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (cos phi1)))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi1) (* -1 (* phi2 (sin phi1))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) phi2))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* -1 phi2)))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* phi2 (- (* 1/2 (/ (PI) phi2)) 1))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* -1 phi2)))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* phi2 (- (+ (* 1/2 (/ (PI) phi2)) (/ phi1 phi2)) 1))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 phi2))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* phi2 (+ 1 (+ (* 1/2 (/ (PI) phi2)) (/ phi1 phi2))))))
#s(approx (- phi2 phi1) #s(hole binary64 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* phi2 (+ 1 (/ phi1 phi2)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi2) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi2) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi2) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi2) (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (cos phi1) (sin (+ (* -1 phi2) (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 phi2) (* 1/2 (PI))))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (+ 1 (* -1/2 (/ (PI) phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI)))))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (+ phi1 (* 1/2 (PI))) phi2)) 1)))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2)))) (* (sin phi1) (sin phi2))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2))) (* (sin phi1) (sin phi2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2)))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (neg (+ phi1 (* -1 phi2)))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (cos (neg (+ phi1 (* -1 phi2))))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 (* phi2 (- (/ phi1 phi2) 1)))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (- phi1 (* -1 phi2))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (cos (- phi1 (* -1 phi2)))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))))

Calls

15 calls:

Time	Variable		Point	Expression
19.0ms	phi1	@	inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda1) (cos lambda2)) (cos lambda1) (cos lambda2) R (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (PI) 2)) (neg phi2) (/ (PI) 2) (PI) 2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) (sin (- (+ (/ (PI) 2) phi1) phi2)) (- (+ (/ (PI) 2) phi1) phi2) (+ (/ (PI) 2) phi1) (sin (+ (+ (/ (PI) 2) phi1) phi2)) (+ (+ (/ (PI) 2) phi1) phi2) (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (/ (cos (- phi2 phi1)) 2) (cos (- phi2 phi1)) (- phi2 phi1) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) (/ (cos (+ phi2 phi1)) 2) (cos (+ phi2 phi1)) (+ phi2 phi1))
14.0ms	phi1	@	0	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda1) (cos lambda2)) (cos lambda1) (cos lambda2) R (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (PI) 2)) (neg phi2) (/ (PI) 2) (PI) 2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) (sin (- (+ (/ (PI) 2) phi1) phi2)) (- (+ (/ (PI) 2) phi1) phi2) (+ (/ (PI) 2) phi1) (sin (+ (+ (/ (PI) 2) phi1) phi2)) (+ (+ (/ (PI) 2) phi1) phi2) (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (/ (cos (- phi2 phi1)) 2) (cos (- phi2 phi1)) (- phi2 phi1) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) (/ (cos (+ phi2 phi1)) 2) (cos (+ phi2 phi1)) (+ phi2 phi1))
14.0ms	phi2	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda1) (cos lambda2)) (cos lambda1) (cos lambda2) R (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (PI) 2)) (neg phi2) (/ (PI) 2) (PI) 2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) (sin (- (+ (/ (PI) 2) phi1) phi2)) (- (+ (/ (PI) 2) phi1) phi2) (+ (/ (PI) 2) phi1) (sin (+ (+ (/ (PI) 2) phi1) phi2)) (+ (+ (/ (PI) 2) phi1) phi2) (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (/ (cos (- phi2 phi1)) 2) (cos (- phi2 phi1)) (- phi2 phi1) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) (/ (cos (+ phi2 phi1)) 2) (cos (+ phi2 phi1)) (+ phi2 phi1))
13.0ms	lambda1	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda1) (cos lambda2)) (cos lambda1) (cos lambda2) R (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (PI) 2)) (neg phi2) (/ (PI) 2) (PI) 2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) (sin (- (+ (/ (PI) 2) phi1) phi2)) (- (+ (/ (PI) 2) phi1) phi2) (+ (/ (PI) 2) phi1) (sin (+ (+ (/ (PI) 2) phi1) phi2)) (+ (+ (/ (PI) 2) phi1) phi2) (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (/ (cos (- phi2 phi1)) 2) (cos (- phi2 phi1)) (- phi2 phi1) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) (/ (cos (+ phi2 phi1)) 2) (cos (+ phi2 phi1)) (+ phi2 phi1))
13.0ms	lambda2	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda1) (cos lambda2)) (cos lambda1) (cos lambda2) R (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (PI) 2)) (neg phi2) (/ (PI) 2) (PI) 2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) (sin (- (+ (/ (PI) 2) phi1) phi2)) (- (+ (/ (PI) 2) phi1) phi2) (+ (/ (PI) 2) phi1) (sin (+ (+ (/ (PI) 2) phi1) phi2)) (+ (+ (/ (PI) 2) phi1) phi2) (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (/ (cos (- phi2 phi1)) 2) (cos (- phi2 phi1)) (- phi2 phi1) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) (/ (cos (+ phi2 phi1)) 2) (cos (+ phi2 phi1)) (+ phi2 phi1))

rewrite1.6s (10.5%)

Memory

29.0MiB live, 1 225.2MiB allocated; 471ms collecting garbage

Counts

568 → 1 511

Calls

Call 1

Inputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda1)
(cos.f64 lambda2)
R
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 phi2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))
(cos.f64 (-.f64 phi2 phi1))
(-.f64 phi2 phi1)
(*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx R #s(hole binary64 R))
#s(approx (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (* (cos lambda2) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow lambda1 2) (cos lambda2))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* -1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda1 (+ (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* 1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* -1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda1 (+ (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* 1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))) (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (/ (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (/ (* lambda1 (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))) (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (/ (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* lambda1 (+ (* -1/2 (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* 1/6 (/ (* lambda1 (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))))) (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (/ (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (/ (* lambda1 (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (/ (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* lambda1 (+ (* -1/2 (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* 1/6 (/ (* lambda1 (* (sin (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos (neg lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (* (cos lambda1) (cos lambda2))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* -1/2 (* (pow lambda2 2) (cos lambda1))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow lambda2 2) (cos lambda1))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos lambda1))) (* 1/24 (cos lambda1)))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2))))) (+ (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))) (+ (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))))) (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))) (+ (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2))))) (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))))) (* (cos phi1) (* (sin lambda1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos lambda1) (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (+ (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (+ (* lambda2 (+ (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* -1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda2 (+ (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* -1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (+ (/ (* lambda2 (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2))) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (/ (* lambda2 (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))) (/ (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))) (+ (* (sin phi1) (sin phi2)) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* -1/6 (/ (* lambda2 (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))) (/ (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))) (+ (* (sin phi1) (sin phi2)) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (/ (* lambda2 (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2))) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (/ (* lambda2 (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))) (/ (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))) (* -1/6 (/ (* lambda2 (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))))) (* (sin phi1) (sin phi2)))))) (/ (* (sin lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda1) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (+ lambda1 (* -1 lambda2))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (+ lambda1 (* -1 lambda2))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (+ lambda1 (* -1 lambda2))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (+ lambda1 (* -1 lambda2))) (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (sin phi2))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow phi1 2) (cos phi2))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow phi1 2) (cos phi2))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* 1/24 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (sin (- (* 1/2 (PI)) phi2))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* -1/2 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* (pow phi1 2) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi2))) (* 1/24 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2)))))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* (pow phi1 2) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2)))) (* 1/24 (sin (- (* 1/2 (PI)) phi2))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (sin phi2) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (sin phi2) (+ (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (sin phi2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2)))))) (* phi1 (+ (* -1/6 (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi2))))))))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2)))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))) (* phi1 (+ (* 1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi2))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2)))))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (* 1/2 (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))) (* 1/2 (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))) (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2)))))) (* 1/2 (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2)))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))) (* phi1 (+ (* 1/2 (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2)))) (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (cos (- (* 1/2 (PI)) phi2))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (+ (cos (- (* 1/2 (PI)) phi2)) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/2 (sin (- (* 1/2 (PI)) phi2))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (+ (cos (- (* 1/2 (PI)) phi2)) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (+ (* -1/2 (sin (- (* 1/2 (PI)) phi2))) (* phi1 (+ (* -1/6 (cos (+ phi2 (* 1/2 (PI))))) (* -1/6 (cos (- (* 1/2 (PI)) phi2)))))))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (- (* 1/2 (PI)) phi2))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (cos (- (* 1/2 (PI)) phi2))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (+ (cos (- (* 1/2 (PI)) phi2)) (* -1/2 (* phi1 (sin (- (* 1/2 (PI)) phi2)))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) phi2)) (* phi1 (+ (cos (- (* 1/2 (PI)) phi2)) (* phi1 (+ (* -1/2 (sin (- (* 1/2 (PI)) phi2))) (* -1/6 (* phi1 (cos (- (* 1/2 (PI)) phi2)))))))))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (- (* 1/2 (PI)) phi2)))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (- (+ phi1 (* 1/2 (PI))) phi2)))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (cos (+ phi2 (* 1/2 (PI))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* -1/2 (* phi1 (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (cos (+ phi2 (* 1/2 (PI)))) (* phi1 (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* -1/6 (* phi1 (cos (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (+ phi1 (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (- (+ (* -1/6 (* phi1 (sin phi2))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (pow phi1 2) (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2)))))) (* 1/4 (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2)))))))) (sin phi2)) (+ (* -1/6 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (* 1/120 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1/72 (* (cos phi2) (sin phi2))) (+ (* -1/120 (* (cos phi2) (sin phi2))) (+ (* -1/360 (* (cos phi2) (sin phi2))) (* -1/2520 (* (cos phi2) (sin phi2))))))) (* 1/4 (+ (* 1/2520 (* (cos phi2) (sin phi2))) (+ (* 1/360 (* (cos phi2) (sin phi2))) (+ (* 1/120 (* (cos phi2) (sin phi2))) (* 1/72 (* (cos phi2) (sin phi2))))))))) (sin phi2)) (+ (* -1/6 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2)))))) (* 1/4 (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2)))))))) (sin phi2)) (+ (* -1/6 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (* 1/120 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))) (+ (* -1/5040 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))) (* 1/120 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2)))))) (* 1/4 (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2)))))))) (sin phi2))) (+ (* -1/6 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (* 1/120 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2)))))) (sin phi2))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2))))) (sin phi2)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (- (+ (* 1/2 (cos phi2)) (* (pow phi1 2) (- (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2))))))) (* -1/2 (cos phi2)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (- (+ (* 1/2 (cos phi2)) (* (pow phi1 2) (- (+ (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (* (pow phi1 2) (- (* 1/4 (/ (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2))))) (sin phi2))) (+ (* -1/6 (- (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2)))))) (+ (* 1/120 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2))))) (sin phi2)))))))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2))))))) (* -1/2 (cos phi2)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (- (+ (* 1/2 (cos phi2)) (* (pow phi1 2) (- (+ (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (* (pow phi1 2) (- (+ (* 1/4 (/ (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2))))) (sin phi2))) (* (pow phi1 2) (- (* 1/4 (/ (+ (* -1/72 (* (cos phi2) (sin phi2))) (+ (* -1/120 (* (cos phi2) (sin phi2))) (+ (* -1/360 (* (cos phi2) (sin phi2))) (* -1/2520 (* (cos phi2) (sin phi2)))))) (sin phi2))) (+ (* -1/6 (- (* 1/4 (/ (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2))))) (sin phi2))) (+ (* -1/6 (- (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2)))))) (+ (* 1/120 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2))))) (sin phi2))))))) (+ (* -1/5040 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* 1/120 (- (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2)))))) (* 1/4 (/ (+ (* 1/2520 (* (cos phi2) (sin phi2))) (+ (* 1/360 (* (cos phi2) (sin phi2))) (+ (* 1/120 (* (cos phi2) (sin phi2))) (* 1/72 (* (cos phi2) (sin phi2)))))) (sin phi2))))))))) (+ (* -1/6 (- (* 1/4 (/ (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))) (sin phi2))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2)))))) (+ (* 1/120 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2))))) (sin phi2)))))))) (+ (* -1/6 (/ (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))) (sin phi2))) (* 1/4 (/ (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))) (sin phi2))))))) (* -1/2 (cos phi2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (* phi1 (- (* 1/2 (* (cos phi2) (sin phi2))) (* -1/2 (* (cos phi2) (sin phi2)))))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (* phi1 (- (+ (* 1/2 (* (cos phi2) (sin phi2))) (* (pow phi1 2) (- (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))))))) (* -1/2 (* (cos phi2) (sin phi2)))))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (* phi1 (- (+ (* 1/2 (* (cos phi2) (sin phi2))) (* (pow phi1 2) (- (+ (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* (pow phi1 2) (- (* 1/4 (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2)))))) (* 1/4 (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2))))))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))))))) (* -1/2 (* (cos phi2) (sin phi2)))))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (* phi1 (- (+ (* 1/2 (* (cos phi2) (sin phi2))) (* (pow phi1 2) (- (+ (* 1/4 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2))))) (* (pow phi1 2) (- (+ (* 1/4 (+ (* 1/60 (* (cos phi2) (sin phi2))) (+ (* 1/12 (* (cos phi2) (sin phi2))) (* 1/6 (* (cos phi2) (sin phi2)))))) (* (pow phi1 2) (- (* 1/4 (+ (* -1/72 (* (cos phi2) (sin phi2))) (+ (* -1/120 (* (cos phi2) (sin phi2))) (+ (* -1/360 (* (cos phi2) (sin phi2))) (* -1/2520 (* (cos phi2) (sin phi2))))))) (* 1/4 (+ (* 1/2520 (* (cos phi2) (sin phi2))) (+ (* 1/360 (* (cos phi2) (sin phi2))) (+ (* 1/120 (* (cos phi2) (sin phi2))) (* 1/72 (* (cos phi2) (sin phi2)))))))))) (* 1/4 (+ (* -1/6 (* (cos phi2) (sin phi2))) (+ (* -1/12 (* (cos phi2) (sin phi2))) (* -1/60 (* (cos phi2) (sin phi2))))))))) (* 1/4 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))))))) (* -1/2 (* (cos phi2) (sin phi2)))))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos phi2) 2))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi2) 2)) (* 1/2 (* phi1 (* (cos phi2) (sin phi2)))))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi2) 2)) (* phi1 (+ (* 1/4 (* phi1 (+ (* -1 (pow (cos phi2) 2)) (pow (sin phi2) 2)))) (* 1/2 (* (cos phi2) (sin phi2))))))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi2) 2)) (* phi1 (+ (* 1/2 (* (cos phi2) (sin phi2))) (* phi1 (+ (* 1/4 (* phi1 (+ (* -1 (* (cos phi2) (sin phi2))) (* -1/3 (* (cos phi2) (sin phi2)))))) (* 1/4 (+ (* -1 (pow (cos phi2) 2)) (pow (sin phi2) 2))))))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos phi2))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi2)) (* 1/2 (* phi1 (sin phi2))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/4 (* phi1 (cos phi2))) (* 1/2 (sin phi2)))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* 1/2 (sin phi2)) (* phi1 (+ (* -1/4 (cos phi2)) (* -1/12 (* phi1 (sin phi2))))))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (cos phi2)))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* phi1 (sin phi2)))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))))
#s(approx (- phi2 phi1) #s(hole binary64 phi2))
#s(approx (- phi2 phi1) #s(hole binary64 (+ phi2 (* -1 phi1))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos phi2) 2))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* -1/2 (* phi1 (* (cos phi2) (sin phi2)))) (* 1/4 (pow (cos phi2) 2)))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi2) 2)) (* phi1 (+ (* -1/2 (* (cos phi2) (sin phi2))) (* 1/4 (* phi1 (+ (* -1 (pow (cos phi2) 2)) (pow (sin phi2) 2)))))))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi2) 2)) (* phi1 (+ (* -1/2 (* (cos phi2) (sin phi2))) (* phi1 (+ (* 1/4 (* phi1 (+ (* 1/3 (* (cos phi2) (sin phi2))) (* (cos phi2) (sin phi2))))) (* 1/4 (+ (* -1 (pow (cos phi2) 2)) (pow (sin phi2) 2))))))))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos phi2))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* -1/2 (* phi1 (sin phi2))) (* 1/2 (cos phi2)))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/4 (* phi1 (cos phi2))))))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* phi1 (+ (* -1/4 (cos phi2)) (* 1/12 (* phi1 (sin phi2))))))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (cos phi2)))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* -1 (* phi1 (sin phi2))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))))
#s(approx (+ phi2 phi1) #s(hole binary64 phi2))
#s(approx (+ phi2 phi1) #s(hole binary64 (+ phi1 phi2)))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* (sin phi1) (sin phi2))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (* (cos phi1) (cos phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (cos phi1) (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) phi2)))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (- (+ phi1 (* 1/2 (PI))) phi2))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 phi1))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* phi1 (- (+ 1 (* 1/2 (/ (PI) phi1))) (/ phi2 phi1)))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 phi1))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* phi1 (+ 1 (* 1/2 (/ (PI) phi1))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (+ phi1 (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 phi1))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* phi1 (+ 1 (+ (* 1/2 (/ (PI) phi1)) (/ phi2 phi1))))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2))) (* (sin phi1) (sin phi2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (* 1/4 (pow (cos (- phi2 phi1)) 2)) (* 1/4 (pow (cos (+ phi1 phi2)) 2)))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (- phi2 phi1)) 2))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (- phi2 phi1)))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (cos (- phi2 phi1))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (- phi2 phi1) #s(hole binary64 (* phi1 (- (/ phi2 phi1) 1))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (+ phi1 phi2)) 2))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (+ phi1 phi2)))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (cos (+ phi1 phi2))))
#s(approx (+ phi2 phi1) #s(hole binary64 phi1))
#s(approx (+ phi2 phi1) #s(hole binary64 (* phi1 (+ 1 (/ phi2 phi1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (* 1/2 (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1)))) (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ phi2 (* -1 phi1))))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ (- (* 1/2 (PI)) phi2) phi1)) 1)))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1/2 (/ (PI) phi1)) 1)))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) (* -1 phi1)))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ (+ phi2 (* 1/2 (PI))) phi1)) 1)))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2)))) (* (sin phi1) (sin phi2))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2))) (* (sin phi1) (sin phi2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2)) (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2)))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (+ phi2 (* -1 phi1))) 2))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (+ phi2 (* -1 phi1))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (cos (+ phi2 (* -1 phi1)))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (- phi2 (* -1 phi1))) 2))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (- phi2 (* -1 phi1))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (cos (- phi2 (* -1 phi1)))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (sin phi1))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) #s(hole binary64 (+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow phi2 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* 1/6 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* 1/6 (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (cos phi1) (sin (* 1/2 (PI))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (* phi2 (* (cos phi1) (cos (* 1/2 (PI)))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos phi1) (cos (* 1/2 (PI))))) (* -1/2 (* phi2 (* (cos phi1) (sin (* 1/2 (PI)))))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos phi1) (cos (* 1/2 (PI))))) (* phi2 (+ (* -1/2 (* (cos phi1) (sin (* 1/2 (PI))))) (* 1/6 (* phi2 (* (cos phi1) (cos (* 1/2 (PI)))))))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* phi2 (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (* -1 (cos (* 1/2 (PI)))) (* phi2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* phi2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (+ (* -1 phi2) (* 1/2 (PI)))))
#s(approx (neg phi2) #s(hole binary64 (* -1 phi2)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI)))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI)))))))) (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* 1/6 (cos (+ phi1 (* 1/2 (PI))))))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI)))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI)))))))) (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* 1/6 (cos (+ phi1 (* 1/2 (PI))))))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (sin (+ phi1 (* 1/2 (PI))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* 1/2 (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI)))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* -1/2 (* phi2 (sin (+ phi1 (* 1/2 (PI)))))) (* 1/2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI))))))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* 1/2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI))))))) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* 1/2 (* phi2 (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* 1/6 (cos (+ phi1 (* 1/2 (PI)))))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (* 2 (sin (+ phi1 (* 1/2 (PI)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (* 2 (sin (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1 (cos (+ phi1 (* 1/2 (PI))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (* 2 (sin (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (+ (* -1 (cos (+ phi1 (* 1/2 (PI))))) (* -1 (* phi2 (sin (+ phi1 (* 1/2 (PI))))))))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (* 2 (sin (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (+ (* -1 (cos (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (* -1 (sin (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (* -1/6 (cos (+ phi1 (* 1/2 (PI))))) (* 1/6 (cos (+ phi1 (* 1/2 (PI)))))))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (+ phi1 (* 1/2 (PI))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* -1 (* phi2 (cos (+ phi1 (* 1/2 (PI)))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* -1 (cos (+ phi1 (* 1/2 (PI))))) (* -1/2 (* phi2 (sin (+ phi1 (* 1/2 (PI)))))))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* -1 (cos (+ phi1 (* 1/2 (PI))))) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* 1/6 (* phi2 (cos (+ phi1 (* 1/2 (PI)))))))))))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (+ phi1 (* 1/2 (PI))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (cos (+ phi1 (* 1/2 (PI))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* -1/2 (* phi2 (sin (+ phi1 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (+ (sin (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (cos (+ phi1 (* 1/2 (PI)))) (* phi2 (+ (* -1/2 (sin (+ phi1 (* 1/2 (PI))))) (* -1/6 (* phi2 (cos (+ phi1 (* 1/2 (PI)))))))))))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (* phi2 (sin phi1)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ (/ (* phi2 (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1)))))) (sin phi1)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ (* phi2 (+ (* phi2 (- (+ (sin phi1) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2))))) (sin phi1))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1)))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ (* phi2 (+ (* phi2 (- (+ (sin phi1) (+ (* phi2 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* 1/3 (* (cos (neg phi1)) (sin (neg phi1)))) (* (cos (neg phi1)) (sin (neg phi1))))) (* 1/4 (+ (* 1/3 (* (cos phi1) (sin phi1))) (* (cos phi1) (sin phi1)))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2))))) (sin phi1)))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1)))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (* phi2 (sin phi1)))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (+ (/ (* phi2 (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1)))))) (sin phi1)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (+ (* phi2 (+ (* phi2 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1)))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (+ (* phi2 (+ (* phi2 (- (+ (* phi2 (- (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* 1/3 (* (cos (neg phi1)) (sin (neg phi1)))) (* (cos (neg phi1)) (sin (neg phi1))))) (* 1/4 (+ (* 1/3 (* (cos phi1) (sin phi1))) (* (cos phi1) (sin phi1)))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2))))) (sin phi1))) (* -1/6 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))))) (/ (* (cos (- lambda1 lambda2)) (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1))))) (sin phi1)))) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))) (sin phi1))) phi2)))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2))) (* phi2 (sin phi1)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (+ (* 1/4 (/ (pow (cos (neg phi1)) 2) (sin phi1))) (* phi2 (- (* -1/2 (/ (* (cos (neg phi1)) (sin (neg phi1))) (sin phi1))) (* -1/2 (cos phi1))))) (* 1/4 (/ (pow (cos phi1) 2) (sin phi1)))) phi2)))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (+ (* 1/4 (/ (pow (cos (neg phi1)) 2) (sin phi1))) (* phi2 (- (+ (* -1/2 (/ (* (cos (neg phi1)) (sin (neg phi1))) (sin phi1))) (* phi2 (- (* 1/4 (/ (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2)) (sin phi1))) (+ (* -1/6 (/ (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2))) (sin phi1))) (* 1/4 (/ (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2)) (sin phi1))))))) (* -1/2 (cos phi1))))) (* 1/4 (/ (pow (cos phi1) 2) (sin phi1)))) phi2)))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (+ (* 1/4 (/ (pow (cos (neg phi1)) 2) (sin phi1))) (* phi2 (- (+ (* -1/2 (/ (* (cos (neg phi1)) (sin (neg phi1))) (sin phi1))) (* phi2 (- (+ (* 1/4 (/ (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2)) (sin phi1))) (* phi2 (- (* 1/4 (/ (+ (* 1/3 (* (cos (neg phi1)) (sin (neg phi1)))) (* (cos (neg phi1)) (sin (neg phi1)))) (sin phi1))) (+ (* -1/6 (- (* -1/2 (/ (* (cos (neg phi1)) (sin (neg phi1))) (sin phi1))) (* -1/2 (cos phi1)))) (* 1/4 (/ (+ (* 1/3 (* (cos phi1) (sin phi1))) (* (cos phi1) (sin phi1))) (sin phi1))))))) (+ (* -1/6 (/ (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2))) (sin phi1))) (* 1/4 (/ (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2)) (sin phi1))))))) (* -1/2 (cos phi1))))) (* 1/4 (/ (pow (cos phi1) 2) (sin phi1)))) phi2)))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (* 1/4 (pow (cos (neg phi1)) 2)) (* 1/4 (pow (cos phi1) 2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (+ (* 1/4 (pow (cos (neg phi1)) 2)) (* phi2 (- (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* -1/2 (* (cos phi1) (sin phi1)))))) (* 1/4 (pow (cos phi1) 2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (+ (* 1/4 (pow (cos (neg phi1)) 2)) (* phi2 (- (+ (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* phi2 (- (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2)))))) (* -1/2 (* (cos phi1) (sin phi1)))))) (* 1/4 (pow (cos phi1) 2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (+ (* 1/4 (pow (cos (neg phi1)) 2)) (* phi2 (- (+ (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* phi2 (- (+ (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))) (* phi2 (- (* 1/4 (+ (* 1/3 (* (cos (neg phi1)) (sin (neg phi1)))) (* (cos (neg phi1)) (sin (neg phi1))))) (* 1/4 (+ (* 1/3 (* (cos phi1) (sin phi1))) (* (cos phi1) (sin phi1))))))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2)))))) (* -1/2 (* (cos phi1) (sin phi1)))))) (* 1/4 (pow (cos phi1) 2)))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (neg phi1)) 2))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* -1/2 (* phi2 (* (cos (neg phi1)) (sin (neg phi1))))) (* 1/4 (pow (cos (neg phi1)) 2)))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos (neg phi1)) 2)) (* phi2 (+ (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* 1/4 (* phi2 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2)))))))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos (neg phi1)) 2)) (* phi2 (+ (* -1/2 (* (cos (neg phi1)) (sin (neg phi1)))) (* phi2 (+ (* 1/4 (* phi2 (+ (* 1/3 (* (cos (neg phi1)) (sin (neg phi1)))) (* (cos (neg phi1)) (sin (neg phi1)))))) (* 1/4 (+ (* -1 (pow (cos (neg phi1)) 2)) (pow (sin (neg phi1)) 2))))))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (neg phi1)))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* -1/2 (* phi2 (sin (neg phi1)))) (* 1/2 (cos (neg phi1))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos (neg phi1))) (* phi2 (+ (* -1/2 (sin (neg phi1))) (* -1/4 (* phi2 (cos (neg phi1)))))))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos (neg phi1))) (* phi2 (+ (* -1/2 (sin (neg phi1))) (* phi2 (+ (* -1/4 (cos (neg phi1))) (* 1/12 (* phi2 (sin (neg phi1)))))))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (cos (neg phi1))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))))
#s(approx (- phi2 phi1) #s(hole binary64 (- phi2 phi1)))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos phi1) 2))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* -1/2 (* phi2 (* (cos phi1) (sin phi1)))) (* 1/4 (pow (cos phi1) 2)))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi1) 2)) (* phi2 (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/4 (* phi2 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2)))))))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (+ (* 1/4 (pow (cos phi1) 2)) (* phi2 (+ (* -1/2 (* (cos phi1) (sin phi1))) (* phi2 (+ (* 1/4 (* phi2 (+ (* 1/3 (* (cos phi1) (sin phi1))) (* (cos phi1) (sin phi1))))) (* 1/4 (+ (* -1 (pow (cos phi1) 2)) (pow (sin phi1) 2))))))))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos phi1))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (cos phi1)))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* -1/4 (* phi2 (cos phi1))))))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (cos phi1)) (* 1/12 (* phi2 (sin phi1))))))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (cos phi1)))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi1) (* -1 (* phi2 (sin phi1))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) phi2))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* -1 phi2)))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* phi2 (- (* 1/2 (/ (PI) phi2)) 1))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* -1 phi2)))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* phi2 (- (+ (* 1/2 (/ (PI) phi2)) (/ phi1 phi2)) 1))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 phi2))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* phi2 (+ 1 (+ (* 1/2 (/ (PI) phi2)) (/ phi1 phi2))))))
#s(approx (- phi2 phi1) #s(hole binary64 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* phi2 (+ 1 (/ phi1 phi2)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi2) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi2) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi2) (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ (* -1 phi2) (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (cos phi1) (sin (+ (* -1 phi2) (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 phi2) (* 1/2 (PI))))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (+ 1 (* -1/2 (/ (PI) phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) (cos (- lambda1 lambda2))) #s(hole binary64 (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2))))))))
#s(approx (/ (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))))
#s(approx (+ (sin (- (+ (/ (PI) 2) phi1) phi2)) (sin (+ (+ (/ (PI) 2) phi1) phi2))) #s(hole binary64 (+ (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI))))) (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2))))))
#s(approx (sin (- (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (+ phi1 (+ (* -1 phi2) (* 1/2 (PI)))))))
#s(approx (- (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* 1/2 (PI))) phi2)))))))
#s(approx (sin (+ (+ (/ (PI) 2) phi1) phi2)) #s(hole binary64 (sin (- (+ phi1 (* 1/2 (PI))) (* -1 phi2)))))
#s(approx (+ (+ (/ (PI) 2) phi1) phi2) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (+ phi1 (* 1/2 (PI))) phi2)) 1)))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2)))) (* (sin phi1) (sin phi2))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (sin phi1) (sin phi2)) (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (/ (* (cos (- lambda1 lambda2)) (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2)))) (* (sin phi1) (sin phi2)))))
#s(approx (/ (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (/ (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2))) (* (sin phi1) (sin phi2)))))
#s(approx (- (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2))) #s(hole binary64 (- (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2)) (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2)))))
#s(approx (* (/ (cos (- phi2 phi1)) 2) (/ (cos (- phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (neg (+ phi1 (* -1 phi2)))) 2))))
#s(approx (/ (cos (- phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (neg (+ phi1 (* -1 phi2)))))))
#s(approx (cos (- phi2 phi1)) #s(hole binary64 (cos (neg (+ phi1 (* -1 phi2))))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 (* phi2 (- (/ phi1 phi2) 1)))))
#s(approx (* (/ (cos (+ phi2 phi1)) 2) (/ (cos (+ phi2 phi1)) 2)) #s(hole binary64 (* 1/4 (pow (cos (- phi1 (* -1 phi2))) 2))))
#s(approx (/ (cos (+ phi2 phi1)) 2) #s(hole binary64 (* 1/2 (cos (- phi1 (* -1 phi2))))))
#s(approx (cos (+ phi2 phi1)) #s(hole binary64 (cos (- phi1 (* -1 phi2)))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))))

Outputs
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) (neg.f64 (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (neg.f64 #s(literal 2 binary64)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) (neg.f64 #s(literal 2 binary64))) (.f64 (neg.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))) (*.f64 #s(literal 2 binary64) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (sin.f64 phi2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 phi2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (sin.f64 phi2))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2)) (sin.f64 phi1))
(/.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (neg.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (sin.f64 phi1))
(/.f64 (fma.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 (neg.f64 #s(literal 2 binary64)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) (neg.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))) (.f64 #s(literal 2 binary64) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (sin.f64 (neg.f64 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64)))) (.f64 (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(fma.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi2)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi1)) (.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)))
(-.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi2)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))))
(cos.f64 phi2)
(cos.f64 (neg.f64 phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(fma.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi2) #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(+.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) lambda2)) (cos.f64 (-.f64 (neg.f64 lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (neg.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 lambda2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (neg.f64 lambda2))) (cos.f64 (-.f64 lambda1 (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) (cos.f64 (-.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (neg.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (neg.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))) #s(literal 2 binary64))
(+.f64 (.f64 (sin.f64 lambda1) #s(literal 0 binary64)) (.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(cos.f64 lambda1)
(cos.f64 (neg.f64 lambda1))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) #s(literal 0 binary64) (*.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (.f64 (sin.f64 lambda2) #s(literal 0 binary64)) (.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(cos.f64 lambda2)
(cos.f64 (neg.f64 lambda2))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) #s(literal 0 binary64) (*.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
R
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (.f64 (.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (.f64 (.f64 lambda2 lambda2) lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (.f64 (.f64 lambda2 lambda2) lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (sin.f64 phi2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 phi2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (sin.f64 phi2))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2)) (sin.f64 phi1))
(/.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (neg.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (sin.f64 phi1))
(/.f64 (fma.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 (neg.f64 #s(literal 2 binary64)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) (neg.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))) (.f64 #s(literal 2 binary64) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (sin.f64 (neg.f64 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64)))) (.f64 (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(fma.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi2)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)))
(-.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi2)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))))
(cos.f64 phi2)
(cos.f64 (neg.f64 phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(fma.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi2) #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2))
(+.f64 (/.f64 (neg.f64 (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) (.f64 phi2 phi2))) (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) (.f64 phi2 phi2))))
(-.f64 (/.f64 (.f64 phi2 phi2) (-.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 phi2 phi2) (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 phi2 phi2) phi2))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) (.f64 phi2 phi2)))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 phi2 phi2) phi2)))) (neg.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) (.f64 phi2 phi2))))
(/.f64 (neg.f64 (-.f64 (.f64 phi2 phi2) (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (-.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 phi2 phi2) phi2))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 phi2 phi2) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))))
(neg.f64 phi2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (PI.f64)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (PI.f64) (neg.f64 #s(literal 2 binary64))))
(PI.f64)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) #s(literal 1 binary64))
(.f64 #s(literal 2 binary64) (.f64 (cosh.f64 (/.f64 (+.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64))) (cosh.f64 (/.f64 (-.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (sin.f64 phi2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 phi2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (sin.f64 phi2))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2)) (sin.f64 phi1))
(/.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (neg.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (sin.f64 phi1))
(/.f64 (fma.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 (neg.f64 #s(literal 2 binary64)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) (neg.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))) (.f64 #s(literal 2 binary64) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (sin.f64 (neg.f64 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64)))) (.f64 (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(fma.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi2)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 2 binary64) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(.f64 #s(literal 2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(.f64 #s(literal 2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (+.f64 phi2 phi1)) (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (/.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))
(+.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 (-.f64 phi2 phi1))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (.f64 (sin.f64 (-.f64 phi2 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 0 binary64) (sin.f64 (-.f64 phi1 phi2))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (cos.f64 (+.f64 phi2 phi1)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (neg.f64 (-.f64 phi2 phi1)))
(cos.f64 (neg.f64 (-.f64 phi1 phi2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 phi2 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(sin.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 phi2 phi2) phi2 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)))) (fma.f64 phi2 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))
(+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))
(+.f64 phi1 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)
(-.f64 (/.f64 (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (.f64 phi2 phi2) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (fma.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) (/.f64 (.f64 (.f64 phi2 phi2) phi2) (fma.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))))
(/.f64 (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 phi1 phi2) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (.f64 (.f64 phi2 phi2) phi2))) (neg.f64 (fma.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
(+.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (/.f64 (.f64 phi1 phi1) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 phi1 phi1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 phi1 phi1) (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1))) (neg.f64 (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 phi1 phi1))) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 phi1 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (*.f64 (PI.f64) phi1) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi2 phi1))))
(+.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (cos.f64 (-.f64 phi2 phi1)))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))))
(cos.f64 (+.f64 phi2 phi1))
(cos.f64 (neg.f64 (+.f64 phi2 phi1)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 phi2 phi1))))
(fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi2 phi1)) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi2 phi1))))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(sin.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (.f64 (.f64 phi2 phi2) phi2))) (fma.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))
(+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)
(+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (fma.f64 phi2 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) (/.f64 (.f64 (.f64 phi2 phi2) phi2) (fma.f64 phi2 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))))
(-.f64 (/.f64 (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (.f64 phi2 phi2) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)))
(/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 (-.f64 phi2 phi1) (PI.f64))) (*.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)) (.f64 (-.f64 phi2 phi1) (neg.f64 (PI.f64)))) (*.f64 (-.f64 phi2 phi1) (neg.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 phi2 phi2) phi2 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64))) (fma.f64 phi2 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2))))
(/.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)) #s(literal 2 binary64) (.f64 (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)) (PI.f64))) (.f64 (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)) (neg.f64 #s(literal 2 binary64)) (.f64 (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)) (neg.f64 (PI.f64)))) (.f64 (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2)) (neg.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (PI.f64) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)))) (.f64 #s(literal 2 binary64) (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2))))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (-.f64 phi2 phi1) (.f64 (neg.f64 #s(literal 2 binary64)) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)))) (*.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 phi2 phi1)))
(/.f64 (fma.f64 (PI.f64) (-.f64 phi2 phi1) (.f64 #s(literal 2 binary64) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))
(/.f64 (-.f64 (.f64 phi2 phi2) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (neg.f64 (*.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (+.f64 phi2 phi1) #s(literal 3 binary64)) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1) (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (+.f64 phi2 phi1) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (fma.f64 (.f64 phi2 phi2) phi2 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 phi2 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))))
(/.f64 (fma.f64 (.f64 phi2 phi2) phi2 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64))) (fma.f64 phi2 phi2 (-.f64 (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2)))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (sin.f64 phi2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2))
(/.f64 (.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 phi2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (sin.f64 phi2))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2)) (sin.f64 phi1))
(/.f64 (/.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (neg.f64 (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (sin.f64 phi1))
(/.f64 (fma.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 (neg.f64 #s(literal 2 binary64)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) (neg.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))) (.f64 #s(literal 2 binary64) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi1))) (sin.f64 (neg.f64 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64)))) (.f64 (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(fma.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (/.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi2)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi2)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi1)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (sin.f64 phi2)) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)))) (-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)))))
(.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 (+.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (-.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (+.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)))) (-.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (-.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(+.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (/.f64 (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (*.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64)))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(fma.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))) (neg.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))) (neg.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 (-.f64 phi2 phi1)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (cos.f64 (-.f64 phi2 phi1)) (/.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))) (neg.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 (fabs.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fabs.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 phi2 phi1))) (.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (neg.f64 (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 (cos.f64 (-.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (neg.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (neg.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(neg.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))))
(neg.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)))))
(pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 2 binary64))
(+.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(-.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (.f64 (sin.f64 (-.f64 phi2 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 0 binary64) (sin.f64 (-.f64 phi1 phi2))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (cos.f64 (+.f64 phi2 phi1)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (neg.f64 (-.f64 phi2 phi1)))
(cos.f64 (neg.f64 (-.f64 phi1 phi2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 phi2 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(sin.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (-.f64 phi2 phi1))
(.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2))) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)))
(-.f64 phi2 phi1)
(-.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1)) (/.f64 (.f64 phi1 phi1) (+.f64 phi2 phi1)))
(-.f64 (/.f64 (.f64 (.f64 phi2 phi2) phi2) (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2))) (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2))))
(/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (+.f64 phi2 phi1))
(/.f64 (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (neg.f64 (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (neg.f64 (+.f64 phi2 phi1)))
(*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 (+.f64 phi2 phi1)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (cos.f64 (+.f64 phi2 phi1)) (/.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (neg.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 (fabs.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (fabs.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(fabs.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (+.f64 phi2 phi1))) (.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (neg.f64 (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (neg.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (neg.f64 (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(neg.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 2 binary64))
(+.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 2 binary64)))
(-.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))
(/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (cos.f64 (+.f64 phi2 phi1))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64))))
(+.f64 (.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi2 phi1))))
(+.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (cos.f64 (-.f64 phi2 phi1)))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))))
(cos.f64 (+.f64 phi2 phi1))
(cos.f64 (neg.f64 (+.f64 phi2 phi1)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 phi2 phi1))))
(fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi2 phi1)) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi2 phi1))))
(fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(sin.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2)))
(.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
(+.f64 phi1 phi2)
(+.f64 (/.f64 (.f64 (.f64 phi2 phi2) phi2) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2))) (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2))))
(-.f64 (/.f64 (.f64 phi2 phi2) (-.f64 phi2 phi1)) (/.f64 (.f64 phi1 phi1) (-.f64 phi2 phi1)))
(/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1))
(/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)))
(/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (-.f64 phi1 phi2))
(/.f64 (neg.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2))) (neg.f64 (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (neg.f64 (-.f64 phi2 phi1)))
(/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 phi1 phi1 (-.f64 (.f64 phi2 phi2) (*.f64 phi2 phi1))))

eval151.0ms (1%)

Memory: 8.4MiB live, 190.7MiB allocated; 28ms collecting garbage
Compiler: Compiled 15 640 to 5 082 computations (67.5% saved)

prune104.0ms (0.7%)

Memory

45.0MiB live, 91.5MiB allocated; 5ms collecting garbage

Pruning

49 alts after pruning (44 fresh and 5 done)

	Pruned	Kept	Total
New	750	25	775
Fresh	11	19	30
Picked	2	3	5
Done	1	2	3
Total	764	49	813

Accuracy

94.5%

Counts

813 → 49

Alt Table

Click to see full alt table

Status	Accuracy	Program
	69.1%	(.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	69.1%	(.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
	69.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	21.2%	(.f64 (acos.f64 (fma.f64 (/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	19.1%	(.f64 (acos.f64 (fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	53.1%	(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	30.1%	(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	53.2%	(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	63.3%	(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
▶	63.3%	(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
▶	94.0%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	94.0%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	40.4%	(.f64 (acos.f64 (fma.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	69.3%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	42.8%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	42.3%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	53.4%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
✓	69.3%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	29.9%	(.f64 (acos.f64 (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	30.6%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	30.0%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	69.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	40.1%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
▶	42.8%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓	69.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
▶	30.1%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	53.2%	(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
	29.9%	(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	40.1%	(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	94.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) R)
	69.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	72.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	17.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	17.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64))) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	19.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	13.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	20.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 (-.f64 phi2 phi1) (PI.f64))) (.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	30.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	20.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 phi2 phi2) phi2 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)))) (fma.f64 phi2 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	85.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
▶	29.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	37.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓	94.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
✓	94.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	70.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))) R)
	34.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
	34.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)

Compiler

Compiled 2 915 to 2 382 computations (18.3% saved)

series263.0ms (1.7%)

Memory

-30.9MiB live, 197.6MiB allocated; 35ms collecting garbage

Counts

65 → 481

Calls

Call 1

Inputs
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(sin.f64 lambda1)
lambda1
(sin.f64 lambda2)
lambda2
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda1)
(cos.f64 lambda2)
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
(sin.f64 phi2)
R
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))))
(cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))
(-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1))
(-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 phi2 phi1)
(+.f64 phi2 phi1)
(sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)))
(/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))
(/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))

Outputs
#s(approx (* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) R) #s(hole binary64 (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))))
#s(approx R #s(hole binary64 R))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) #s(hole binary64 (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* lambda1 (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (cos phi2))) (* 1/120 (* (pow lambda1 2) (* (cos phi1) (cos phi2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/120 (* (cos phi1) (cos phi2)))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2)))))))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda2) (* (cos phi1) (cos phi2))))))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow lambda1 2) (cos lambda2))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))) (+ (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))))) (+ (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))))) (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (+ (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))) (+ (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* 1/6 (* lambda1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))) (+ (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))) (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* 1/6 (* lambda1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))) (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* (cos phi1) (* (cos phi2) (sin lambda1)))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (* (cos lambda1) (cos lambda2))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* -1/2 (* (pow lambda2 2) (cos lambda1))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow lambda2 2) (cos lambda1))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos lambda1))) (* 1/24 (cos lambda1)))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (+ (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (+ (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (+ (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* -1/6 (* lambda2 (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))) (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (+ (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* -1/6 (* lambda2 (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))) (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (+ lambda1 (* -1 lambda2))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (+ lambda1 (* -1 lambda2))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (+ lambda1 (* -1 lambda2))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (* -1 phi1)) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (* -1 phi1)) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (* -1 phi1)) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (* -1 phi1)) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* (cos phi2) (sin lambda1)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (sin lambda1)))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* (cos phi2) (sin lambda1)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (sin lambda1)))) (* 1/24 (* (cos phi2) (sin lambda1))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow phi1 2) (cos phi2))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow phi1 2) (cos phi2))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos lambda1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (sin phi2))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/24 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* -1/2 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* 1/24 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/24 (sin (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))) (* phi1 (+ (* -1/6 (sin phi2)) (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* phi1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi1 (* (cos (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* phi1 (* (cos (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* 1/24 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (sin (* 1/2 (+ (PI) (* 2 phi2))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* -1/2 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* 1/24 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* 1/24 (sin (* 1/2 (+ (PI) (* 2 phi2))))))))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (* 1/2 (sin (* 1/2 (+ (PI) (* 2 phi2)))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* -1/4 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* 1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/4 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* 1/48 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/4 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/1440 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* 1/48 (sin (* 1/2 (+ (PI) (* 2 phi2))))))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (sin (* 1/2 (+ (PI) (* 2 phi2))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* -1/2 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* 1/24 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* 1/24 (sin (* 1/2 (+ (PI) (* 2 phi2))))))))))))
#s(approx (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) #s(hole binary64 1))
#s(approx (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2) #s(hole binary64 (* -1 phi1)))
#s(approx (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) #s(hole binary64 (* -2 phi1)))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (+ phi2 (* -1 phi1))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))))
#s(approx (- phi2 phi1) #s(hole binary64 phi2))
#s(approx (- phi2 phi1) #s(hole binary64 (+ phi2 (* -1 phi1))))
#s(approx (+ phi2 phi1) #s(hole binary64 phi2))
#s(approx (+ phi2 phi1) #s(hole binary64 (+ phi1 phi2)))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (sin (* 1/2 (+ (PI) (* 2 phi2))))))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 (* 1/2 (+ (PI) (* 2 phi2)))))
#s(approx (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) #s(hole binary64 (+ (PI) (* 2 phi2))))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (* -1 (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (+ phi1 (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (cos phi2)))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow phi1 2) (cos phi2))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow phi1 2) (cos phi2))))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (cos phi2) phi1)))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (+ (cos phi2) (* (pow phi1 2) (- (* -1/2 (cos phi2)) (* -1/6 (cos phi2))))) phi1)))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (+ (cos phi2) (* (pow phi1 2) (- (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (- (* 1/24 (cos phi2)) (+ (* -1/6 (- (* -1/2 (cos phi2)) (* -1/6 (cos phi2)))) (* 1/120 (cos phi2)))))) (* -1/6 (cos phi2))))) phi1)))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (+ (cos phi2) (* (pow phi1 2) (- (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (- (+ (* 1/24 (cos phi2)) (* (pow phi1 2) (- (* -1/720 (cos phi2)) (+ (* -1/6 (- (* 1/24 (cos phi2)) (+ (* -1/6 (- (* -1/2 (cos phi2)) (* -1/6 (cos phi2)))) (* 1/120 (cos phi2))))) (+ (* -1/5040 (cos phi2)) (* 1/120 (- (* -1/2 (cos phi2)) (* -1/6 (cos phi2))))))))) (+ (* -1/6 (- (* -1/2 (cos phi2)) (* -1/6 (cos phi2)))) (* 1/120 (cos phi2)))))) (* -1/6 (cos phi2))))) phi1)))
#s(approx (/ (* (sin phi1) (sin phi2)) (sin phi2)) #s(hole binary64 phi1))
#s(approx (/ (* (sin phi1) (sin phi2)) (sin phi2)) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (/ (* (sin phi1) (sin phi2)) (sin phi2)) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (/ (* (sin phi1) (sin phi2)) (sin phi2)) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (* (cos phi1) (cos phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* (sin phi1) (sin phi2))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (sin (+ phi1 (* 1/2 (PI))))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 phi1))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* phi1 (+ 1 (* 1/2 (/ (PI) phi1))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))
#s(approx (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) #s(hole binary64 (cos (* -1 phi1))))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (* -1 phi1)))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (* phi1 (- (/ phi2 phi1) 1))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* -1 phi1)))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* phi1 (- (+ (* 1/2 (/ (PI) phi1)) (/ phi2 phi1)) 1))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (- phi2 phi1) #s(hole binary64 (* phi1 (- (/ phi2 phi1) 1))))
#s(approx (+ phi2 phi1) #s(hole binary64 phi1))
#s(approx (+ phi2 phi1) #s(hole binary64 (* phi1 (+ 1 (/ phi2 phi1)))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 phi1))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* phi1 (+ 1 (+ (* 1/2 (/ (PI) phi1)) (/ phi2 phi1))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (* (cos phi1) (cos phi2))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (* (cos phi1) (cos phi2)) (sin phi1))))
#s(approx (/ (* (sin phi1) (sin phi2)) (sin phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi1)))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi1))))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi1)))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1/2 (/ (PI) phi1)) 1)))))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ (+ phi2 (* 1/2 (PI))) phi1)) 1)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* (cos phi1) (sin lambda1))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (sin lambda1)))) (* (cos phi1) (sin lambda1)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* (cos phi1) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (sin lambda1))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (sin lambda1)))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* (cos phi1) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (sin lambda1)))) (* 1/24 (* (cos phi1) (sin lambda1))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow phi2 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos lambda1) (* (cos lambda2) (cos phi1)))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (sin phi1))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* -1/6 (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (* 1/2 (PI))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (* (cos phi1) (cos (* 1/2 (PI))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos phi1) (sin (* 1/2 (PI)))))) (* (cos phi1) (cos (* 1/2 (PI)))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos phi1) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos phi1) (cos (* 1/2 (PI)))))))) (* (cos phi1) (cos (* 1/2 (PI)))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* phi2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))) (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))) (* (cos (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))) (* (cos (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1/2 (* phi2 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* phi2 (+ (* -1/2 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))) (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* -1/6 (* phi2 (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))) (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))))) (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* 1/2 (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))) (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))) (* phi2 (+ (* -1/4 (* phi2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))) (* 1/2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI))))))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))) (* phi2 (+ (* 1/2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI))))) (* phi2 (+ (* -1/4 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))) (* -1/12 (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))))) (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (- phi2 phi1)))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) phi1)))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (- (+ phi2 (* 1/2 (PI))) phi1)))
#s(approx (- phi2 phi1) #s(hole binary64 (- phi2 phi1)))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* phi2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi2 (cos (* 1/2 (PI))))))))))))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 (* 1/2 (PI))))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) #s(hole binary64 (PI)))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (* -1/2 (PI))))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (- (* -1 phi2) (* 1/2 (PI)))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (cos phi1)))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos phi1))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow phi2 2) (cos phi1))))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (cos phi1) (sin phi1))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (cos phi1)) (sin phi1))) (/ (cos phi1) (sin phi1)))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1/2 (/ (cos phi1) (sin phi1))) (* 1/24 (/ (* (pow phi2 2) (cos phi1)) (sin phi1))))) (/ (cos phi1) (sin phi1)))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1/2 (/ (cos phi1) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (/ (* (pow phi2 2) (cos phi1)) (sin phi1))) (* 1/24 (/ (cos phi1) (sin phi1))))))) (/ (cos phi1) (sin phi1)))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 phi2))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* phi2 (- (+ 1 (* 1/2 (/ (PI) phi2))) (/ phi1 phi2)))))
#s(approx (- phi2 phi1) #s(hole binary64 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* phi2 (+ 1 (/ phi1 phi2)))))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 phi2))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#s(approx (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) #s(hole binary64 (* 2 phi2)))
#s(approx (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) #s(hole binary64 (* phi2 (+ 2 (/ (PI) phi2)))))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (* -1 phi2)))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* phi2 (+ 1 (+ (* 1/2 (/ (PI) phi2)) (/ phi1 phi2))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (- (PI) (* -2 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (- (PI) (* -2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (- (PI) (* -2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (- (PI) (* -2 phi2))))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (- (PI) (* -2 phi2)))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (- (PI) (* -2 phi2))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (- (PI) (* -2 phi2)))))))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (/ phi1 phi2) 1)))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (- (* 1/2 (PI)) phi1) phi2)) 1)))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 (* phi2 (- (/ phi1 phi2) 1)))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (sin (* 1/2 (- (PI) (* -2 phi2))))))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (PI) phi2)) 2)))))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (* -1 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2)))))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (+ phi1 (* 1/2 (PI))) phi2)) 1)))))

Calls

15 calls:

Time	Variable		Point	Expression
43.0ms	phi2	@	-inf	((* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) R) (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (* (* (cos phi1) (cos phi2)) (sin lambda1)) (* (cos phi1) (cos phi2)) (cos phi1) phi1 (cos phi2) phi2 (sin lambda1) lambda1 (sin lambda2) lambda2 (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (cos lambda1) (cos lambda2)) (cos lambda1) (cos lambda2) (* (sin phi1) (sin phi2)) (sin phi1) (sin phi2) R (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi2)) (+ (/ (PI) 2) phi2) (/ (PI) 2) (PI) 2 (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi1)) (+ (/ (PI) 2) phi1) (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2) (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ (- phi2 phi1) (/ (PI) 2)) (- phi2 phi1) (+ phi2 phi1) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) (+ (+ phi2 phi1) (/ (PI) 2)) (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2)))
41.0ms	lambda1	@	-inf	((* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) R) (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (* (* (cos phi1) (cos phi2)) (sin lambda1)) (* (cos phi1) (cos phi2)) (cos phi1) phi1 (cos phi2) phi2 (sin lambda1) lambda1 (sin lambda2) lambda2 (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (cos lambda1) (cos lambda2)) (cos lambda1) (cos lambda2) (* (sin phi1) (sin phi2)) (sin phi1) (sin phi2) R (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi2)) (+ (/ (PI) 2) phi2) (/ (PI) 2) (PI) 2 (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi1)) (+ (/ (PI) 2) phi1) (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2) (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ (- phi2 phi1) (/ (PI) 2)) (- phi2 phi1) (+ phi2 phi1) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) (+ (+ phi2 phi1) (/ (PI) 2)) (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2)))
33.0ms	R	@	0	((* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) R) (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (* (* (cos phi1) (cos phi2)) (sin lambda1)) (* (cos phi1) (cos phi2)) (cos phi1) phi1 (cos phi2) phi2 (sin lambda1) lambda1 (sin lambda2) lambda2 (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (cos lambda1) (cos lambda2)) (cos lambda1) (cos lambda2) (* (sin phi1) (sin phi2)) (sin phi1) (sin phi2) R (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi2)) (+ (/ (PI) 2) phi2) (/ (PI) 2) (PI) 2 (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi1)) (+ (/ (PI) 2) phi1) (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2) (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ (- phi2 phi1) (/ (PI) 2)) (- phi2 phi1) (+ phi2 phi1) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) (+ (+ phi2 phi1) (/ (PI) 2)) (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2)))
18.0ms	lambda2	@	-inf	((* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) R) (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (* (* (cos phi1) (cos phi2)) (sin lambda1)) (* (cos phi1) (cos phi2)) (cos phi1) phi1 (cos phi2) phi2 (sin lambda1) lambda1 (sin lambda2) lambda2 (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (cos lambda1) (cos lambda2)) (cos lambda1) (cos lambda2) (* (sin phi1) (sin phi2)) (sin phi1) (sin phi2) R (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi2)) (+ (/ (PI) 2) phi2) (/ (PI) 2) (PI) 2 (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi1)) (+ (/ (PI) 2) phi1) (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2) (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ (- phi2 phi1) (/ (PI) 2)) (- phi2 phi1) (+ phi2 phi1) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) (+ (+ phi2 phi1) (/ (PI) 2)) (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2)))
14.0ms	lambda1	@	inf	((* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) R) (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (* (* (cos phi1) (cos phi2)) (sin lambda1)) (* (cos phi1) (cos phi2)) (cos phi1) phi1 (cos phi2) phi2 (sin lambda1) lambda1 (sin lambda2) lambda2 (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (cos lambda1) (cos lambda2)) (cos lambda1) (cos lambda2) (* (sin phi1) (sin phi2)) (sin phi1) (sin phi2) R (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi2)) (+ (/ (PI) 2) phi2) (/ (PI) 2) (PI) 2 (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (sin (+ (/ (PI) 2) phi1)) (+ (/ (PI) 2) phi1) (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2) (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ (- phi2 phi1) (/ (PI) 2)) (- phi2 phi1) (+ phi2 phi1) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) (+ (+ phi2 phi1) (/ (PI) 2)) (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2)))

rewrite2.3s (15.1%)

Memory

-134.4MiB live, 880.0MiB allocated; 1.6s collecting garbage

Counts

546 → 932

Calls

Call 1

Inputs
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(sin.f64 lambda1)
lambda1
(sin.f64 lambda2)
lambda2
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda1)
(cos.f64 lambda2)
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
(sin.f64 phi2)
R
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))))
(cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))
(-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1))
(-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 phi2 phi1)
(+.f64 phi2 phi1)
(sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2)))
(/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))
(/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))
#s(approx (* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) R) #s(hole binary64 (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))))
#s(approx R #s(hole binary64 R))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) #s(hole binary64 (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* lambda1 (* (cos phi1) (cos phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (cos phi2))) (* 1/120 (* (pow lambda1 2) (* (cos phi1) (cos phi2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/120 (* (cos phi1) (cos phi2)))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2)))))))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda2) (* (cos phi1) (cos phi2))))))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow lambda1 2) (cos lambda2))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))) (+ (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi1) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))) (* (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))) (+ (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))))) (+ (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))))) (* (cos (neg lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (+ (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))) (+ (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* 1/6 (* lambda1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))) (+ (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))) (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* 1/6 (* lambda1 (* (cos (* -1 phi1)) (* (sin (neg lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))) (* (cos (neg lambda2)) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* (cos phi1) (* (cos phi2) (sin lambda1)))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (* (cos lambda1) (cos lambda2))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* -1/2 (* (pow lambda2 2) (cos lambda1))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow lambda2 2) (cos lambda1))))))))
#s(approx (* (cos lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos lambda1))) (* 1/24 (cos lambda1)))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos phi1) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (+ (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (+ (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* lambda2 (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (sin lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos lambda1) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (+ (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (+ (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* -1/6 (* lambda2 (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))) (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (+ (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* -1/6 (* lambda2 (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))) (* (cos (* -1 phi1)) (* (sin lambda1) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))) (* (cos lambda1) (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (+ lambda1 (* -1 lambda2))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (+ lambda1 (* -1 lambda2))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (+ lambda1 (* -1 lambda2))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (* -1 phi1)) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (* -1 phi1)) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (* -1 phi1)) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (* -1 phi1)) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* (cos phi2) (sin lambda1)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (sin lambda1)))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* (cos phi2) (sin lambda1)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (sin lambda1)))) (* 1/24 (* (cos phi2) (sin lambda1))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow phi1 2) (cos phi2))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow phi1 2) (cos phi2))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos lambda1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (sin phi2))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/24 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* -1/2 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* 1/24 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/24 (sin (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (+ (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))) (* phi1 (+ (* -1/6 (sin phi2)) (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))) (* -1/6 (* phi1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi1 (* (cos (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* phi1 (* (cos (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* 1/24 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (sin (* 1/2 (+ (PI) (* 2 phi2))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* -1/2 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* 1/24 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* 1/24 (sin (* 1/2 (+ (PI) (* 2 phi2))))))))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (* 1/2 (sin (* 1/2 (+ (PI) (* 2 phi2)))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* -1/4 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* 1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/4 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* 1/48 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/4 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/1440 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* 1/48 (sin (* 1/2 (+ (PI) (* 2 phi2))))))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (sin (* 1/2 (+ (PI) (* 2 phi2))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* -1/2 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* 1/24 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sin (* 1/2 (+ (PI) (* 2 phi2)))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (+ (PI) (* 2 phi2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (* 1/2 (+ (PI) (* 2 phi2)))))) (* 1/24 (sin (* 1/2 (+ (PI) (* 2 phi2))))))))))))
#s(approx (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) #s(hole binary64 1))
#s(approx (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2) #s(hole binary64 (* -1 phi1)))
#s(approx (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) #s(hole binary64 (* -2 phi1)))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (+ phi2 (* -1 phi1))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (+ phi2 (+ (* -1 phi1) (* 1/2 (PI))))))
#s(approx (- phi2 phi1) #s(hole binary64 phi2))
#s(approx (- phi2 phi1) #s(hole binary64 (+ phi2 (* -1 phi1))))
#s(approx (+ phi2 phi1) #s(hole binary64 phi2))
#s(approx (+ phi2 phi1) #s(hole binary64 (+ phi1 phi2)))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (sin (* 1/2 (+ (PI) (* 2 phi2))))))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 (* 1/2 (+ (PI) (* 2 phi2)))))
#s(approx (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) #s(hole binary64 (+ (PI) (* 2 phi2))))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (* -1 (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (+ phi1 (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (cos phi2)))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow phi1 2) (cos phi2))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow phi1 2) (cos phi2))))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (cos phi2) phi1)))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (+ (cos phi2) (* (pow phi1 2) (- (* -1/2 (cos phi2)) (* -1/6 (cos phi2))))) phi1)))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (+ (cos phi2) (* (pow phi1 2) (- (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (- (* 1/24 (cos phi2)) (+ (* -1/6 (- (* -1/2 (cos phi2)) (* -1/6 (cos phi2)))) (* 1/120 (cos phi2)))))) (* -1/6 (cos phi2))))) phi1)))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (+ (cos phi2) (* (pow phi1 2) (- (+ (* -1/2 (cos phi2)) (* (pow phi1 2) (- (+ (* 1/24 (cos phi2)) (* (pow phi1 2) (- (* -1/720 (cos phi2)) (+ (* -1/6 (- (* 1/24 (cos phi2)) (+ (* -1/6 (- (* -1/2 (cos phi2)) (* -1/6 (cos phi2)))) (* 1/120 (cos phi2))))) (+ (* -1/5040 (cos phi2)) (* 1/120 (- (* -1/2 (cos phi2)) (* -1/6 (cos phi2))))))))) (+ (* -1/6 (- (* -1/2 (cos phi2)) (* -1/6 (cos phi2)))) (* 1/120 (cos phi2)))))) (* -1/6 (cos phi2))))) phi1)))
#s(approx (/ (* (sin phi1) (sin phi2)) (sin phi2)) #s(hole binary64 phi1))
#s(approx (/ (* (sin phi1) (sin phi2)) (sin phi2)) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (/ (* (sin phi1) (sin phi2)) (sin phi2)) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (/ (* (sin phi1) (sin phi2)) (sin phi2)) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (* (cos phi1) (cos phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* (sin phi1) (sin phi2))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (sin (+ phi1 (* 1/2 (PI)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (sin (+ phi1 (* 1/2 (PI))))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 phi1))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* phi1 (+ 1 (* 1/2 (/ (PI) phi1))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (+ (PI) (* 2 phi2)))))))
#s(approx (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) #s(hole binary64 (cos (* -1 phi1))))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (* -1 phi1)))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (* phi1 (- (/ phi2 phi1) 1))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* -1 phi1)))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* phi1 (- (+ (* 1/2 (/ (PI) phi1)) (/ phi2 phi1)) 1))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (- phi2 phi1) #s(hole binary64 (* phi1 (- (/ phi2 phi1) 1))))
#s(approx (+ phi2 phi1) #s(hole binary64 phi1))
#s(approx (+ phi2 phi1) #s(hole binary64 (* phi1 (+ 1 (/ phi2 phi1)))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 phi1))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* phi1 (+ 1 (+ (* 1/2 (/ (PI) phi1)) (/ phi2 phi1))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (* (cos phi1) (cos phi2))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (* (cos phi1) (cos phi2)) (sin phi1))))
#s(approx (/ (* (sin phi1) (sin phi2)) (sin phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi1))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi1))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi1)))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi1))))))
#s(approx (sin (+ (/ (PI) 2) phi1)) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi1)))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1/2 (/ (PI) phi1)) 1)))))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* 1/2 (PI))) phi1)))))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ (+ phi2 (* 1/2 (PI))) phi1)) 1)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda1)) (sin lambda2)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (* (cos phi1) (sin lambda1))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (sin lambda1)))) (* (cos phi1) (sin lambda1)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* (cos phi1) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (sin lambda1))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (sin lambda1)))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin lambda1)) #s(hole binary64 (+ (* (cos phi1) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (sin lambda1)))) (* 1/24 (* (cos phi1) (sin lambda1))))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow phi2 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos lambda1) (* (cos lambda2) (cos phi1)))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))
#s(approx (+ (* (* (cos lambda1) (cos lambda2)) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (sin phi1))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* -1/6 (* phi2 (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))) (* (cos phi1) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (* 1/2 (PI))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (* (cos phi1) (cos (* 1/2 (PI))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos phi1) (sin (* 1/2 (PI)))))) (* (cos phi1) (cos (* 1/2 (PI)))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos phi1) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos phi1) (cos (* 1/2 (PI)))))))) (* (cos phi1) (cos (* 1/2 (PI)))))) (* (cos phi1) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* phi2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))) (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))))) (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin (+ phi1 (* 1/2 (PI)))))))) (* (cos (- lambda1 lambda2)) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))) (* (cos (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI)))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))) (* (cos (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ phi1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* -1/2 (* phi2 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (+ (* phi2 (+ (* -1/2 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))) (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* -1/6 (* phi2 (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))) (* (cos (* -1 phi1)) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))) (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))))) (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* 1/2 (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))) (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))) (* phi2 (+ (* -1/4 (* phi2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))) (* 1/2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI))))))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (+ (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))) (* phi2 (+ (* 1/2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI))))) (* phi2 (+ (* -1/4 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))) (* -1/12 (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))))) (* (cos (* -1 phi1)) (cos (* 1/2 (PI)))))) (* (cos (* -1 phi1)) (sin (* 1/2 (PI)))))))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (- phi2 phi1)))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) phi1)))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (- (+ phi2 (* 1/2 (PI))) phi1)))
#s(approx (- phi2 phi1) #s(hole binary64 (- phi2 phi1)))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* phi2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi2 (cos (* 1/2 (PI))))))))))))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 (* 1/2 (PI))))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) #s(hole binary64 (PI)))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (* -1/2 (PI))))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (- (* -1 phi2) (* 1/2 (PI)))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (* (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2))) #s(hole binary64 (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (cos phi1)))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos phi1))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow phi2 2) (cos phi1))))))))
#s(approx (* (/ (* (cos phi1) (cos phi2)) (sin phi1)) (/ (* (sin phi1) (sin phi2)) (sin phi2))) #s(hole binary64 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (/ (cos phi1) (sin phi1))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (cos phi1)) (sin phi1))) (/ (cos phi1) (sin phi1)))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1/2 (/ (cos phi1) (sin phi1))) (* 1/24 (/ (* (pow phi2 2) (cos phi1)) (sin phi1))))) (/ (cos phi1) (sin phi1)))))
#s(approx (/ (* (cos phi1) (cos phi2)) (sin phi1)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1/2 (/ (cos phi1) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (/ (* (pow phi2 2) (cos phi1)) (sin phi1))) (* 1/24 (/ (cos phi1) (sin phi1))))))) (/ (cos phi1) (sin phi1)))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 phi2))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* phi2 (- (+ 1 (* 1/2 (/ (PI) phi2))) (/ phi1 phi2)))))
#s(approx (- phi2 phi1) #s(hole binary64 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* phi2 (+ 1 (/ phi1 phi2)))))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 phi2))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#s(approx (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) #s(hole binary64 (* 2 phi2)))
#s(approx (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) #s(hole binary64 (* phi2 (+ 2 (/ (PI) phi2)))))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (* -1 phi2)))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* phi2 (+ 1 (+ (* 1/2 (/ (PI) phi2)) (/ phi1 phi2))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (cos phi1) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (cos phi1) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ (/ (PI) 2) phi2)) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ (/ (PI) 2) phi2) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi2))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (sin (+ (/ (PI) 2) phi1)) (sin (+ (/ (PI) 2) phi2))) #s(hole binary64 (* (sin (+ phi1 (* 1/2 (PI)))) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (* (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) R) #s(hole binary64 (* R (acos (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (- (PI) (* -2 phi2)))))) (* (sin phi1) (sin phi2)))))))
#s(approx (acos (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (acos (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (- (PI) (* -2 phi2)))))) (* (sin phi1) (sin phi2))))))
#s(approx (+ (* (sin phi2) (sin phi1)) (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (- (PI) (* -2 phi2)))))) (* (sin phi1) (sin phi2)))))
#s(approx (* (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (* -1 phi1)) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (- (PI) (* -2 phi2))))))))
#s(approx (* 2 (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2)) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (- (PI) (* -2 phi2)))))))
#s(approx (/ (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) 2) #s(hole binary64 (* 1/2 (* (cos (* -1 phi1)) (sin (* 1/2 (- (PI) (* -2 phi2))))))))
#s(approx (* (cos (/ (- (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) (+ phi2 phi1)) 2)) (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2))) #s(hole binary64 (* (cos (* -1 phi1)) (sin (* 1/2 (- (PI) (* -2 phi2)))))))
#s(approx (- (+ (- phi2 phi1) (/ (PI) 2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (/ phi1 phi2) 1)))))
#s(approx (+ (- phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (- (* 1/2 (PI)) phi1) phi2)) 1)))))
#s(approx (- phi2 phi1) #s(hole binary64 (* -1 (* phi2 (- (/ phi1 phi2) 1)))))
#s(approx (+ phi2 phi1) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))))
#s(approx (sin (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2)) #s(hole binary64 (sin (* 1/2 (- (PI) (* -2 phi2))))))
#s(approx (/ (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) 2) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (- (+ (/ (PI) 2) phi2) (- phi1 (+ (+ phi2 phi1) (/ (PI) 2)))) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (PI) phi2)) 2)))))
#s(approx (- phi1 (+ (+ phi2 phi1) (/ (PI) 2))) #s(hole binary64 (* -1 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2)))))))
#s(approx (+ (+ phi2 phi1) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (+ phi1 (* 1/2 (PI))) phi2)) 1)))))

Outputs
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1))))
(-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1))) (sin.f64 lambda2)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 lambda1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1))
(.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 phi1))
(.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 lambda1)))
(.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 lambda1) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 lambda1)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 lambda1) (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) #s(literal 0 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2) (.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 0 binary64))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(+.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(-.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi1)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi1
(+.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(-.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi2)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)))) (-.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))))
(cos.f64 phi2)
(cos.f64 (neg.f64 phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(fma.f64 (cos.f64 phi2) #s(literal 1 binary64) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi2) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi2
(sin.f64 lambda1)
lambda1
(sin.f64 lambda2)
lambda2
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))) (cos.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(+.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) lambda2)) (cos.f64 (-.f64 (neg.f64 lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (neg.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 lambda2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (neg.f64 lambda2))) (cos.f64 (-.f64 lambda1 (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) (cos.f64 (-.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (neg.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (neg.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))) #s(literal 2 binary64))
(+.f64 (.f64 (sin.f64 lambda1) #s(literal 0 binary64)) (.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(cos.f64 lambda1)
(cos.f64 (neg.f64 lambda1))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) #s(literal 0 binary64) (*.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (.f64 (sin.f64 lambda2) #s(literal 0 binary64)) (.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(cos.f64 lambda2)
(cos.f64 (neg.f64 lambda2))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) #s(literal 0 binary64) (*.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(sin.f64 phi1)
(sin.f64 phi2)
R
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1))))
(-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1))) (sin.f64 lambda2)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 lambda1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (neg.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))) (cos.f64 phi2)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) #s(literal 0 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2) (.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 0 binary64))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(+.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(-.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi2)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)))) (-.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))))
(cos.f64 phi2)
(cos.f64 (neg.f64 phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(fma.f64 (cos.f64 phi2) #s(literal 1 binary64) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi2) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)
(+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 phi2 phi2) phi2) (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (/.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 phi2 phi2) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) phi2))) (neg.f64 (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi2 phi2))) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 phi2 phi2 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (*.f64 (PI.f64) phi2) #s(literal 2 binary64)))))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (PI.f64)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (PI.f64) (neg.f64 #s(literal 2 binary64))))
(PI.f64)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) #s(literal 1 binary64))
(.f64 #s(literal 2 binary64) (.f64 (cosh.f64 (/.f64 (+.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64))) (cosh.f64 (/.f64 (-.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64)))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (.f64 (.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (.f64 (.f64 lambda2 lambda2) lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (.f64 (.f64 lambda2 lambda2) lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1))))
(-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1))) (sin.f64 lambda2)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 lambda1) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (neg.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))) (cos.f64 phi2)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 lambda1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) #s(literal 0 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi2))) (cos.f64 (-.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi2) (.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 0 binary64))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(+.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(-.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi1)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
(+.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (/.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi1 phi1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 phi1 phi1) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1))) (neg.f64 (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi1 phi1))) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 phi1 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (*.f64 (PI.f64) phi1) #s(literal 2 binary64)))))
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))))
(.f64 (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))
(fma.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (.f64 (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))
(.f64 (.f64 #s(literal 2 binary64) (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))))
(.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))
(.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (.f64 (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (+.f64 (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64) (.f64 (neg.f64 #s(literal 2 binary64)) (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 (neg.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (neg.f64 #s(literal 2 binary64)) (.f64 (neg.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 (neg.f64 #s(literal 2 binary64)) (neg.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (neg.f64 #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))))) (-.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(fma.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64) (.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))))
(*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (/.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (neg.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))))) (sin.f64 (+.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (+.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) (PI.f64)) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (+.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) (PI.f64)) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (+.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) (PI.f64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (+.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(+.f64 (.f64 (cos.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 0 binary64)) (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))
(cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64)))
(cos.f64 (neg.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))
(sin.f64 (/.f64 (+.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) (PI.f64)) #s(literal 2 binary64)))
(sin.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64)) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))
(-.f64 (/.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) #s(literal 2 binary64)) (/.f64 phi1 #s(literal 2 binary64)))
(-.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1)) (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1)) (.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1)) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64))) (.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (+.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64)) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 3 binary64)) (.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 phi2 phi1))) (.f64 (fma.f64 (+.f64 phi2 phi1) (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1)) (.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64)) (fma.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 2 binary64)) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))))
(neg.f64 (neg.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))))
(+.f64 (-.f64 phi2 phi1) (-.f64 #s(literal 0 binary64) (+.f64 phi2 phi1)))
(+.f64 (-.f64 phi2 phi1) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (-.f64 phi2 phi1) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1))
(-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1)
(-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi1) phi2)
(-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 phi2 (+.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64)))) (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1))) (/.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1))))
(-.f64 (/.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 3 binary64)) (fma.f64 (+.f64 phi2 phi1) (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1)) (.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64)))))) (/.f64 (.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 phi2 phi1)) (fma.f64 (+.f64 phi2 phi1) (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1)) (.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64)))))))
(/.f64 (*.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1)) (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1)) (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1)))
(/.f64 (-.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 3 binary64)) (.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 phi2 phi1))) (fma.f64 (+.f64 phi2 phi1) (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1)) (*.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))))))
(/.f64 (-.f64 (.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2)) (.f64 phi1 phi1)) (+.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1))
(/.f64 (-.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)))) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))) (fma.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)))))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))) (-.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))) (-.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)))) (.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)))))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))) (*.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) #s(literal 3 binary64)) (.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 phi2 phi1)))) (neg.f64 (fma.f64 (+.f64 phi2 phi1) (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1)) (*.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1)) (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1))) (neg.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) (+.f64 phi2 phi1))))
(/.f64 (-.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) (fma.f64 phi1 phi1 (*.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1))))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2))) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)))) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2))))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 phi1)) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)))) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 phi2 phi1)))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64)))) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2))) (.f64 (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)))) (.f64 (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64)))) (-.f64 phi2 phi1)) (.f64 (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)))) (*.f64 (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 phi1)))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (-.f64 phi2 phi1) (-.f64 #s(literal 0 binary64) (+.f64 phi2 phi1)))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (-.f64 phi2 phi1) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2))) (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2)) (-.f64 #s(literal 0 binary64) (+.f64 phi2 phi1)))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2))) (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (-.f64 phi2 phi1) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (-.f64 phi2 phi1))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64)))
(-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 phi2 (+.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (-.f64 (-.f64 phi2 phi1) #s(literal 0 binary64)))
(/.f64 (*.f64 (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64)))) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (fma.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1) (pow.f64 #s(literal 0 binary64) #s(literal 3 binary64))) (fma.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (*.f64 (-.f64 phi2 phi1) #s(literal 0 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))) (PI.f64))) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (*.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 #s(literal 2 binary64))) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))) (neg.f64 (PI.f64)))) (.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (*.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64))) (.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (neg.f64 #s(literal 2 binary64))) (.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (PI.f64)))) (.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))))) (neg.f64 (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (-.f64 phi2 phi1) #s(literal 0 binary64))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2))) (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2)) #s(literal 0 binary64))
(+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1))
(+.f64 phi2 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (/.f64 (.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)))) (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (*.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)))))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)
(-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (*.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)))
(/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 (+.f64 phi2 phi1) (PI.f64))) (*.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)) (.f64 (+.f64 phi2 phi1) (neg.f64 (PI.f64)))) (*.f64 (+.f64 phi2 phi1) (neg.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2)) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2))))
(/.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1)) #s(literal 2 binary64) (.f64 (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2)) (PI.f64))) (.f64 (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1)) (neg.f64 #s(literal 2 binary64)) (.f64 (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2)) (neg.f64 (PI.f64)))) (.f64 (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2)) (neg.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (PI.f64) (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2))))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (+.f64 phi2 phi1) (.f64 (neg.f64 #s(literal 2 binary64)) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)))) (*.f64 (neg.f64 #s(literal 2 binary64)) (+.f64 phi2 phi1)))
(/.f64 (fma.f64 (PI.f64) (+.f64 phi2 phi1) (.f64 #s(literal 2 binary64) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))
(/.f64 (-.f64 (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (.f64 phi1 phi1)) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 phi2 phi2) (.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 phi1)) (*.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)) (.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (fma.f64 phi1 phi1 (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))))
(/.f64 (-.f64 (.f64 (.f64 phi2 phi2) phi2) (pow.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 phi2 phi2 (fma.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2))) (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (-.f64 phi2 phi1))
(.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2))) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)))
(-.f64 phi2 phi1)
(-.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1)) (/.f64 (.f64 phi1 phi1) (+.f64 phi2 phi1)))
(-.f64 (/.f64 (.f64 (.f64 phi2 phi2) phi2) (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2))) (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2))))
(/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (+.f64 phi2 phi1))
(/.f64 (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (neg.f64 (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (neg.f64 (+.f64 phi2 phi1)))
(.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2)))
(.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
(+.f64 phi1 phi2)
(+.f64 (/.f64 (.f64 (.f64 phi2 phi2) phi2) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2))) (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2))))
(-.f64 (/.f64 (.f64 phi2 phi2) (-.f64 phi2 phi1)) (/.f64 (.f64 phi1 phi1) (-.f64 phi2 phi1)))
(/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 phi2 phi1))
(/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)))
(/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (-.f64 phi1 phi2))
(/.f64 (neg.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2))) (neg.f64 (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (neg.f64 (-.f64 phi2 phi1)))
(/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 phi1 phi1 (-.f64 (.f64 phi2 phi2) (*.f64 phi2 phi1))))
(-.f64 (.f64 (sin.f64 (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 (/.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 phi2 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 (fma.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64)) (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64)) (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64)) (fma.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(neg.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (-.f64 phi2 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1))
(+.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (-.f64 phi2 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 phi2 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (fma.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (pow.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(-.f64 (/.f64 (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (-.f64 phi2 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) phi2)) (fma.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (.f64 phi1 phi1))) (.f64 (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 phi1 phi1) phi1) (pow.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (fma.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (*.f64 phi1 phi1))))
(/.f64 (-.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 phi2 phi2)) (fma.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (.f64 phi1 phi1))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (.f64 (.f64 phi1 phi1) phi1) (pow.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (fma.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (.f64 phi1 phi1))))
(/.f64 (-.f64 (.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) phi2)) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (.f64 (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (fma.f64 phi2 (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)))
(/.f64 (-.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 phi2 phi2)) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 phi2 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 (-.f64 phi2 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi2 (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1))
(-.f64 (-.f64 phi1 phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(-.f64 (/.f64 (.f64 phi1 phi1) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)))
(-.f64 (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (.f64 phi1 phi1))) (/.f64 (pow.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (.f64 phi1 phi1))))
(/.f64 (*.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))
(/.f64 (-.f64 (.f64 (-.f64 (-.f64 phi1 phi1) phi2) (-.f64 (-.f64 phi1 phi1) phi2)) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (+.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 phi1 phi1) phi1) (pow.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (*.f64 phi1 phi1)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 phi1 phi1) phi1) (pow.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (*.f64 phi1 phi1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (-.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 phi1 phi1) phi2) #s(literal 3 binary64)) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (-.f64 (-.f64 phi1 phi1) phi2) (-.f64 (-.f64 phi1 phi1) phi2) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (-.f64 (-.f64 phi1 phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)
(+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (/.f64 (.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 phi2 phi1)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)))) (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)))))
(-.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (-.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)))
(/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 (-.f64 phi2 phi1) (PI.f64))) (*.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (neg.f64 #s(literal 2 binary64)) (.f64 (-.f64 phi2 phi1) (neg.f64 (PI.f64)))) (*.f64 (-.f64 phi2 phi1) (neg.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2))))
(/.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)) #s(literal 2 binary64) (.f64 (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)) (PI.f64))) (.f64 (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)) (neg.f64 #s(literal 2 binary64)) (.f64 (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)) (neg.f64 (PI.f64)))) (.f64 (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2)) (neg.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (PI.f64) (fma.f64 phi1 (-.f64 phi1 phi2) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi2 phi2) phi2)))) (.f64 #s(literal 2 binary64) (fma.f64 phi1 (-.f64 phi1 phi2) (*.f64 phi2 phi2))))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (-.f64 phi2 phi1) (.f64 (neg.f64 #s(literal 2 binary64)) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)))) (*.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 phi2 phi1)))
(/.f64 (fma.f64 (PI.f64) (-.f64 phi2 phi1) (.f64 #s(literal 2 binary64) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))
(/.f64 (-.f64 (.f64 phi2 phi2) (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (-.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (-.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 phi2 phi1) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 phi2 phi2) phi2 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64))) (fma.f64 phi2 phi2 (-.f64 (.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (*.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 phi1 (+.f64 phi2 phi1) (.f64 phi2 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1))) (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (acos.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(acos.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))) (.f64 (*.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) (pow.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))) (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))) (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (/.f64 (cos.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (/.f64 (cos.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))
(fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (sin.f64 phi2)))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)))
(.f64 (.f64 (*.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi1)) (/.f64 (cos.f64 phi2) (sin.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 (/.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi1)))
(.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)))
(.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(.f64 (.f64 (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 phi1)) #s(literal 1 binary64))
(.f64 (sin.f64 phi1) (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1))
(/.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))) (sin.f64 (neg.f64 phi2)))
(/.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 (neg.f64 phi1)))
(/.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 (neg.f64 phi2))))
(/.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 (neg.f64 phi1))))
(/.f64 (.f64 (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))) (sin.f64 (neg.f64 phi2)))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (sin.f64 (neg.f64 phi1)))
(/.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(/.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64)))) (sin.f64 (neg.f64 phi1)))
(/.f64 (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (sin.f64 phi1))) (sin.f64 (neg.f64 phi2)))
(*.f64 (/.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (cos.f64 phi2) (/.f64 (cos.f64 phi1) (sin.f64 phi1)))
(/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))
(/.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (neg.f64 phi1)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 2 binary64) (sin.f64 phi1)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (neg.f64 (sin.f64 (neg.f64 phi1))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (sin.f64 phi1)))
(neg.f64 (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (neg.f64 phi1))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sin.f64 phi1))
(*.f64 (sin.f64 phi2) (/.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))
(/.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (sin.f64 (neg.f64 phi2)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 #s(literal 2 binary64) (sin.f64 phi2)))
(/.f64 (neg.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2))) (neg.f64 (sin.f64 (neg.f64 phi2))))
(neg.f64 (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 (neg.f64 phi2))))
(neg.f64 (/.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)) (sin.f64 phi2)))

eval190.0ms (1.2%)

Memory: 39.6MiB live, 172.5MiB allocated; 28ms collecting garbage
Compiler: Compiled 19 236 to 5 974 computations (68.9% saved)

prune283.0ms (1.8%)

Memory

-5.2MiB live, 137.3MiB allocated; 35ms collecting garbage

Pruning

59 alts after pruning (52 fresh and 7 done)

	Pruned	Kept	Total
New	788	21	809
Fresh	8	31	39
Picked	3	2	5
Done	0	5	5
Total	799	59	858

Accuracy

94.5%

Counts

858 → 59

Alt Table

Click to see full alt table

Status	Accuracy	Program
	69.1%	(.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	69.1%	(.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
	69.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	69.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	19.1%	(.f64 (acos.f64 (fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	53.1%	(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	30.1%	(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	53.2%	(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	69.3%	(.f64 (acos.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	69.3%	(.f64 (acos.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	63.3%	(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)))) (-.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	85.5%	(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
✓	63.3%	(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	69.1%	(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (/.f64 (sin.f64 phi1) (sin.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	69.2%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi1)) (/.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	94.0%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	40.4%	(.f64 (acos.f64 (fma.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	69.2%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))) (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	42.8%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	42.3%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	53.4%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
✓	69.3%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	29.9%	(.f64 (acos.f64 (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	94.0%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
	69.2%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))) R)
	30.6%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	30.0%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	29.2%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	40.1%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	25.5%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
✓	42.8%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓	69.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	30.5%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	30.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	10.9%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (/.f64 (-.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	19.6%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
	30.0%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	53.2%	(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
	93.9%	(.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
	29.9%	(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	40.1%	(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	94.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	72.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	13.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	20.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 (-.f64 phi2 phi1) (PI.f64))) (.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	30.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	20.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 phi2 phi2) phi2 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)))) (fma.f64 phi2 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	85.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	21.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	24.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	18.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
	37.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓	94.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
✓	94.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	70.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))) R)
	34.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
	34.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)

Compiler

Compiled 3 700 to 2 178 computations (41.1% saved)

regimes334.0ms (2.2%)

Memory

-23.6MiB live, 304.9MiB allocated; 71ms collecting garbage

Counts

95 → 1

Calls

Call 1

Inputs
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 (-.f64 phi2 phi1) (PI.f64))) (.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))) (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi1)) (/.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64))) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (/.f64 (-.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 phi2 phi2) phi2 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)))) (fma.f64 phi2 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)))) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (/.f64 (sin.f64 phi1) (sin.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 phi1) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)))) (-.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))))) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(.f64 (/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) R)
(.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
(.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
(.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)

Outputs

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)

Calls

10 calls:

51.0ms	lambda2
33.0ms	lambda1
29.0ms	phi1
28.0ms	phi2
28.0ms	(cos.f64 (-.f64 lambda1 lambda2))

Results

Accuracy	Segments	Branch
94.1%	1	`(-.f64 lambda1 lambda2)`
94.1%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
94.1%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
94.1%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
94.1%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
94.1%	1	`R`
94.1%	1	`lambda1`
94.1%	1	`lambda2`
94.1%	1	`phi1`
94.1%	1	`phi2`

Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes269.0ms (1.7%)

Memory

-13.3MiB live, 142.5MiB allocated; 90ms collecting garbage

Counts

63 → 1

Calls

Call 1

Inputs
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 (-.f64 phi2 phi1) (PI.f64))) (.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))) (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi1)) (/.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64))) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (/.f64 (-.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 phi2 phi2) phi2 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)))) (fma.f64 phi2 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)))) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (.f64 (/.f64 (.f64 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (sin.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)

Outputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1))))) R)

Outputs

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1))))) R)

Calls

10 calls:

44.0ms	phi2
43.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
21.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
20.0ms	phi1
19.0ms	lambda1

Results

Accuracy	Segments	Branch
69.3%	1	`(-.f64 lambda1 lambda2)`
69.3%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
69.3%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
69.3%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
69.3%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
69.3%	1	`R`
69.3%	1	`lambda1`
69.3%	1	`lambda2`
69.3%	1	`phi1`
69.3%	1	`phi2`

Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes240.0ms (1.6%)

Memory

49.2MiB live, 270.8MiB allocated; 38ms collecting garbage

Accuracy

Total -41.3b remaining (-210.2%)

Threshold costs -41.3b (-210.2%)

Counts

55 → 1

Calls

Call 1

Inputs
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (/.f64 (fma.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 2 binary64) (.f64 (-.f64 phi2 phi1) (PI.f64))) (.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 #s(literal 0 binary64))) phi2) phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 phi2 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 (/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (sin.f64 (fma.f64 (/.f64 (.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) (-.f64 (.f64 (.f64 phi2 phi2) phi2) (.f64 (.f64 phi1 phi1) phi1))) (fma.f64 phi1 (+.f64 phi2 phi1) (*.f64 phi2 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (+.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1))) (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (/.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi1)) (/.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) #s(literal 1 binary64))) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (sin.f64 (/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64))) (fma.f64 phi1 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(literal 3 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (.f64 phi1 (+.f64 (+.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

Outputs
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

Calls

10 calls:

35.0ms	phi2
26.0ms	lambda2
23.0ms	lambda1
22.0ms	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
21.0ms	R

Results

Accuracy	Segments	Branch
69.3%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
69.3%	1	`(-.f64 lambda1 lambda2)`
69.3%	1	`phi1`
69.3%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
69.3%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
69.3%	1	`lambda1`
69.3%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
69.3%	1	`R`
69.3%	1	`phi2`
69.3%	1	`lambda2`

Compiler

Compiled 58 to 86 computations (-48.3% saved)

derivations1.0ms (0%)

Memory

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

Stop Event

1×

fuel

Compiler

Compiled 47 to 35 computations (25.5% saved)

preprocess60.0ms (0.4%)

Memory

20.4MiB live, 111.1MiB allocated; 7ms collecting garbage

Remove

(sort phi1 phi2)

(sort lambda1 lambda2)

(negabs R)

Compiler

Compiled 424 to 400 computations (5.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze1.1s (7.4%)

sample5.9s (38.1%)

preprocess75.0ms (0.5%)

series41.0ms (0.3%)

rewrite623.0ms (4%)

eval15.0ms (0.1%)

prune21.0ms (0.1%)

series212.0ms (1.4%)

rewrite1.2s (8%)

eval110.0ms (0.7%)

prune55.0ms (0.4%)

series173.0ms (1.1%)

rewrite1.6s (10.5%)

eval151.0ms (1%)

prune104.0ms (0.7%)

series263.0ms (1.7%)

rewrite2.3s (15.1%)

eval190.0ms (1.2%)

prune283.0ms (1.8%)

regimes334.0ms (2.2%)

regimes269.0ms (1.7%)

regimes240.0ms (1.6%)

derivations1.0ms (0%)

preprocess60.0ms (0.4%)

end0.0ms (0%)

Profiling