Herbie run

Date:Thursday, March 6th, 2025
Commit:4b6bc306 on chassis-platforms-cleanup
Seed:2025065
Parameters:256 points for 4 iterations
Flags:
reduce:regimesreduce:binary-searchreduce:branch-expressionsreduce:simplifysetup:simplifysetup:searchrules:arithmeticrules:polynomialsrules:fractionsrules:exponentsrules:trigonometryrules:hyperbolicrules:numericsrules:specialrules:boolsrules:branchesgenerate:rrgenerate:taylorgenerate:simplifygenerate:proofs
default
Memory:1 060 188.5 MB

Time bar (total: 13.7min)

prune3.8min (27.7%)

Memory
2 369.8MiB live, 353 922.8MiB allocated; 43.2s collecting garbage
Counts
194 512 → 2 220
Compiler

Compiled 718 090 to 178 139 computations (75.2% saved)

sample3.7min (26.6%)

Memory
2 107.7MiB live, 257 211.4MiB allocated; 50.7s collecting garbage
Samples
55.6s120 625×1valid
54.2s18 155×5exit
36.8s280 764×0valid
18.9s24 673×2valid
8.4s3 228×3valid
5.5s35 074×0exit
2.7s11 925×1invalid
2.5s19 550×0invalid
423.0ms858×2invalid
200.0ms22×4valid
21.0ms38×1exit
1.0ms1×3exit
Precisions
Click to see histograms. Total time spent on operations: 2.7min
ival-pow: 45.1s (27.8% of total)
ival-mult: 18.1s (11.2% of total)
adjust: 15.8s (9.8% of total)
ival-cos: 11.1s (6.9% of total)
ival-div: 10.5s (6.5% of total)
ival-sin: 8.6s (5.3% of total)
ival-pow2: 7.4s (4.6% of total)
ival-exp: 7.1s (4.4% of total)
ival-add: 5.9s (3.6% of total)
ival-sub: 5.9s (3.6% of total)
ival-cosu: 5.6s (3.5% of total)
ival-sinu: 5.6s (3.4% of total)
ival-log: 4.0s (2.5% of total)
ival-sqrt: 3.3s (2% of total)
ival-neg: 2.0s (1.2% of total)
ival-atan2: 927.0ms (0.6% of total)
ival-log1p: 890.0ms (0.5% of total)
ival-hypot: 748.0ms (0.5% of total)
ival-tan: 624.0ms (0.4% of total)
ival-acos: 610.0ms (0.4% of total)
const: 409.0ms (0.3% of total)
exact: 373.0ms (0.2% of total)
ival-atan: 275.0ms (0.2% of total)
ival-cbrt: 272.0ms (0.2% of total)
ival-fabs: 209.0ms (0.1% of total)
ival-assert: 191.0ms (0.1% of total)
ival-asin: 153.0ms (0.1% of total)
ival-pi: 136.0ms (0.1% of total)
ival-<: 75.0ms (0% of total)
ival-and: 54.0ms (0% of total)
ival-<=: 7.0ms (0% of total)
ival-==: 1.0ms (0% of total)
ival-or: 0.0ms (0% of total)
Bogosity

series2.3min (17.1%)

Memory
-601.5MiB live, 151 342.8MiB allocated; 37.5s collecting garbage
Counts
9 429 → 66 990
Calls

1524 calls:

TimeVariablePointExpression
1.1min
angle
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))) a (* x-scale (* (sqrt 2) (sqrt 8))) x-scale (* (sqrt 2) (sqrt 8)) (sqrt 2) 2 (sqrt 8) 8 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* a (* x-scale (* y-scale (pow 8 1/2)))) (pow (- (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2)) 1/2))) (* (* a (* x-scale (* y-scale (pow 8 1/2)))) (pow (- (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2)) 1/2)) (* y-scale (+ (* (* a (* x-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* a (* x-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* (pow y-scale 2) (+ (* -1/2 (* (* a (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* -1/2 (* (* a (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))))))))) y-scale (+ (* (* a (* x-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* a (* x-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* (pow y-scale 2) (+ (* -1/2 (* (* a (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* -1/2 (* (* a (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1))))))))) (* a (* x-scale (sqrt 8))) (* x-scale (sqrt 8)) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (pow x-scale 2) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (* (pow y-scale 2) (+ (* -1/4 (* (/ (* a (* x-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* (pow y-scale 2) (+ (* -1/2 (* (* a (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* -1/2 (* (* a (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))))))) (pow y-scale 2) (+ (* -1/4 (* (/ (* a (* x-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* (pow y-scale 2) (+ (* -1/2 (* (* a (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* -1/2 (* (* a (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1))))))) -1/4 (* (/ (* a (* x-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1))) (/ (* a (* x-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* a (* x-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* x-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1) -1 (* (pow y-scale 2) (+ (* -1/2 (* (* a (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* -1/2 (* (* a (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))))) (+ (* -1/2 (* (* a (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* -1/2 (* (* a (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1))))) -1/2 (* (* a (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1))) (* a (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))) (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) 6 (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* -1/2 (* (* a (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1)))) (* (* a (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))) (sqrt (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -1))) (* a (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))) (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* a (* x-scale (* y-scale (pow 8 1/2)))) (pow (- (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2)) 1/2))) (* (* a (* x-scale (* y-scale (pow 8 1/2)))) (pow (- (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2)) 1/2)) (* a (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) (pow (- (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2)) 1/2) (- (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2)) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* x-scale x-scale) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (* y-scale y-scale) (* x-scale x-scale)) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (- (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (- (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))))) 1/2)) (pow (- (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))))) 1/2) (- (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* a a) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* b b) b (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))))) (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/2 (/ (- (+ (* -8 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow b 2))))) (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/2 (/ (- (+ (* -8 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow b 2)))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -8 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow b 2))) (/ (- (+ (* -8 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow b 2)) (- (+ (* -8 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -8 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) -8 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (- (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* x-scale x-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* x-scale x-scale))))) 1/2))) (* (* x-scale (pow 8 1/2)) (pow (- (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* x-scale x-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* x-scale x-scale))))) 1/2)) (* x-scale (pow 8 1/2)) (pow (- (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* x-scale x-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* x-scale x-scale))))) 1/2) (- (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* x-scale x-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* x-scale x-scale))))) (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 4) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
4.1s
lambda1
@0
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (/ (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (/ (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (pow (cos lambda1) 3) (cos lambda1) lambda1 3 (pow (cos lambda2) 3) (cos lambda2) lambda2 (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (pow (sin lambda1) 3) (sin lambda1) (pow (sin lambda2) 3) (sin lambda2) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (+ (pow (* (cos lambda1) (cos lambda2)) 3) (pow (* (sin lambda1) (sin lambda2)) 3)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (+ (pow (* (cos lambda1) (cos lambda2)) 3) (pow (* (sin lambda1) (sin lambda2)) 3)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (+ (pow (* (cos lambda1) (cos lambda2)) 3) (pow (* (sin lambda1) (sin lambda2)) 3)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (* (cos phi1) (cos phi2)) (/ (+ (pow (* (cos lambda1) (cos lambda2)) 3) (pow (* (sin lambda1) (sin lambda2)) 3)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (- (+ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (* (cos lambda1) (* (cos lambda2) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (- (+ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (* (cos lambda1) (* (cos lambda2) (* (sin lambda1) (sin lambda2))))) (+ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (pow (cos lambda1) 2) 2 (pow (cos lambda2) 2) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (pow (sin lambda1) 2) (pow (sin lambda2) 2) (* (cos lambda1) (* (cos lambda2) (* (sin lambda1) (sin lambda2)))) (* (cos lambda2) (* (sin lambda1) (sin lambda2))) (* (acos (+ (/ (pow (* (sin phi2) (sin phi1)) 3) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (* (pow (* (cos phi2) (cos phi1)) 3) (pow (cos (- lambda1 lambda2)) 3)) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))))) R) (acos (+ (/ (pow (* (sin phi2) (sin phi1)) 3) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (* (pow (* (cos phi2) (cos phi1)) 3) (pow (cos (- lambda1 lambda2)) 3)) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))))) (+ (/ (pow (* (sin phi2) (sin phi1)) 3) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (* (pow (* (cos phi2) (cos phi1)) 3) (pow (cos (- lambda1 lambda2)) 3)) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (/ (pow (* (sin phi2) (sin phi1)) 3) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (pow (* (sin phi2) (sin phi1)) 3) (* (sin phi2) (sin phi1)) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (neg (* (sin phi2) (sin phi1))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (/ (* (pow (* (cos phi2) (cos phi1)) 3) (pow (cos (- lambda1 lambda2)) 3)) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (* (pow (* (cos phi2) (cos phi1)) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (* (cos phi2) (cos phi1)) 3) (* (cos phi2) (cos phi1)) (pow (cos (- lambda1 lambda2)) 3) (* (- (/ (PI) 2) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (pow (cos phi2) 3) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))))) R) (- (/ (PI) 2) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (pow (cos phi2) 3) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))))) (/ (PI) 2) (PI) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (pow (cos phi2) 3) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))))))) (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (pow (cos phi2) 3) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))) (+ (* phi2 (- (* phi2 (- (+ (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))) (* -1 (/ (* (pow (cos phi1) 4) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))) (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (- (* phi2 (- (+ (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))) (* -1 (/ (* (pow (cos phi1) 4) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))) (* phi2 (- (+ (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))) (- (+ (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))) (+ (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (* (cos phi1) (cos (- lambda1 lambda2))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))) (* (fabs (sin phi1)) (fabs (sin phi2))) (fabs (sin phi1)) (fabs (sin phi2)) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))))) (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))) (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (pow (sin phi1) 3) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))) -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))))) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))) (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))) (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (pow (cos phi1) 5) 5 (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5)) (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))) (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (pow (cos phi1) 4) 4 (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)))) (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) -1/2 (* (sin phi1) (cos (- lambda1 lambda2))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2)))) -1/6 (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (pow (cos phi1) 6) 6 (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6)) (pow (cos (- lambda1 lambda2)) 6) (* -1 (/ (* (pow (cos phi1) 4) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (/ (* (pow (cos phi1) 4) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* (pow (cos phi1) 4) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4))) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos (- lambda1 lambda2)) 4) (* (- (/ (PI) 2) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))))) R) (- (/ (PI) 2) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))))) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))))))) (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))) (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (pow (sin phi2) 3) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3)) (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi2) 2) (pow (cos phi1) 3) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))))) (fabs (* (sin phi2) (sin phi1))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))) (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))))
2.9s
lambda2
@0
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (/ (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (/ (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (/ (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))))) (+ (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3)) (pow (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) 3) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (pow (cos lambda1) 3) (cos lambda1) lambda1 3 (pow (cos lambda2) 3) (cos lambda2) lambda2 (pow (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) 3) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (pow (sin lambda1) 3) (sin lambda1) (pow (sin lambda2) 3) (sin lambda2) (+ (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (cos lambda1) 3) (pow (cos lambda2) 3))) (- (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (* (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (* (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (+ (pow (* (cos lambda1) (cos lambda2)) 3) (pow (* (sin lambda1) (sin lambda2)) 3)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (+ (pow (* (cos lambda1) (cos lambda2)) 3) (pow (* (sin lambda1) (sin lambda2)) 3)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (+ (pow (* (cos lambda1) (cos lambda2)) 3) (pow (* (sin lambda1) (sin lambda2)) 3)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (* (cos phi1) (cos phi2)) (/ (+ (pow (* (cos lambda1) (cos lambda2)) 3) (pow (* (sin lambda1) (sin lambda2)) 3)) (+ (* (* (cos lambda1) (cos lambda2)) (* (cos lambda1) (cos lambda2))) (- (* (* (sin lambda1) (sin lambda2)) (* (sin lambda1) (sin lambda2))) (* (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (- (+ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (* (cos lambda1) (* (cos lambda2) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (- (+ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (* (cos lambda1) (* (cos lambda2) (* (sin lambda1) (sin lambda2))))) (+ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (pow (cos lambda1) 2) 2 (pow (cos lambda2) 2) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (pow (sin lambda1) 2) (pow (sin lambda2) 2) (* (cos lambda1) (* (cos lambda2) (* (sin lambda1) (sin lambda2)))) (* (cos lambda2) (* (sin lambda1) (sin lambda2))) (* (acos (+ (/ (pow (* (sin phi2) (sin phi1)) 3) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (* (pow (* (cos phi2) (cos phi1)) 3) (pow (cos (- lambda1 lambda2)) 3)) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))))) R) (acos (+ (/ (pow (* (sin phi2) (sin phi1)) 3) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (* (pow (* (cos phi2) (cos phi1)) 3) (pow (cos (- lambda1 lambda2)) 3)) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))))) (+ (/ (pow (* (sin phi2) (sin phi1)) 3) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (* (pow (* (cos phi2) (cos phi1)) 3) (pow (cos (- lambda1 lambda2)) 3)) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (/ (pow (* (sin phi2) (sin phi1)) 3) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (pow (* (sin phi2) (sin phi1)) 3) (* (sin phi2) (sin phi1)) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (neg (* (sin phi2) (sin phi1))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (/ (* (pow (* (cos phi2) (cos phi1)) 3) (pow (cos (- lambda1 lambda2)) 3)) (+ (* (neg (* (sin phi2) (sin phi1))) (neg (* (sin phi2) (sin phi1)))) (- (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (* (pow (* (cos phi2) (cos phi1)) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (* (cos phi2) (cos phi1)) 3) (* (cos phi2) (cos phi1)) (pow (cos (- lambda1 lambda2)) 3) (* (- (/ (PI) 2) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (pow (cos phi2) 3) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))))) R) (- (/ (PI) 2) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (pow (cos phi2) 3) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))))) (/ (PI) 2) (PI) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (pow (cos phi2) 3) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))))))) (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (pow (cos phi2) 3) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))) (+ (* phi2 (- (* phi2 (- (+ (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))) (* -1 (/ (* (pow (cos phi1) 4) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))) (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (- (* phi2 (- (+ (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))) (* -1 (/ (* (pow (cos phi1) 4) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))) (* phi2 (- (+ (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))) (- (+ (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))) (+ (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (* (cos phi1) (cos (- lambda1 lambda2))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))) (* (fabs (sin phi1)) (fabs (sin phi2))) (fabs (sin phi1)) (fabs (sin phi2)) (* phi2 (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))))) (- (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))) (/ (pow (sin phi1) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (pow (sin phi1) 3) (+ (* -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))) -1 (/ (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (* (cos phi1) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))))) (* (sin phi1) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))))) (* (cos (- lambda1 lambda2)) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))))) (- (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))))) (* -3/2 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 3) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (+ (* -1 (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))) (/ (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* (pow (cos phi1) 5) (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5))) (pow (cos phi1) 5) 5 (* (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5)) (pow (sin phi1) 2) (pow (cos (- lambda1 lambda2)) 5) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (* -1 (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (/ (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (pow (* (cos phi1) (cos (- lambda1 lambda2))) 5) (+ (* -1 (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))))) (/ (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* (pow (cos phi1) 4) (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))))) (pow (cos phi1) 4) 4 (* (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)))) (+ (* -1/2 (* (sin phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2))))) -1/2 (* (sin phi1) (cos (- lambda1 lambda2))) (* -1/6 (* (sin phi1) (cos (- lambda1 lambda2)))) -1/6 (* (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2))) (* -1 (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (/ (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (* (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* (pow (cos phi1) 6) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6))) (pow (cos phi1) 6) 6 (* (sin phi1) (pow (cos (- lambda1 lambda2)) 6)) (pow (cos (- lambda1 lambda2)) 6) (* -1 (/ (* (pow (cos phi1) 4) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2)))))))) (/ (* (pow (cos phi1) 4) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))) (+ (* (pow (cos phi1) 2) (* (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (* (fabs (sin phi1)) (fabs (sin phi2))) (* (fabs (sin phi1)) (fabs (sin phi2))))))) (* (pow (cos phi1) 4) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4))) (* (sin phi1) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos (- lambda1 lambda2)) 4) (* (- (/ (PI) 2) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))))) R) (- (/ (PI) 2) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))))) (asin (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))))))) (/ (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))))) (+ (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3))) (* (pow (sin phi2) 3) (pow (sin phi1) 3)) (pow (sin phi2) 3) (* (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3)) (* (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi1) 3)) (* (pow (cos phi2) 2) (cos phi2)) (pow (cos phi2) 2) (pow (cos phi1) 3) (pow (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) 3) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+ (* (fabs (* (sin phi2) (sin phi1))) (fabs (* (sin phi2) (sin phi1)))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))))) (fabs (* (sin phi2) (sin phi1))) (- (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)))) (* (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (* (* (sin phi2) (sin phi1)) (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1))))
1.7s
ew
@0
((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (+ (* (* -1 eh) (* (tanh (asinh (* (/ -1 (cos t)) (/ (* (sin t) eh) ew)))) (sin t))) (* (* (cos t) ew) (cos (atan (* (/ -1 (cos t)) (/ (* (sin t) eh) ew)))))) (* -1 eh) -1 eh (* (tanh (asinh (* (/ -1 (cos t)) (/ (* (sin t) eh) ew)))) (sin t)) (tanh (asinh (* (/ -1 (cos t)) (/ (* (sin t) eh) ew)))) (asinh (* (/ -1 (cos t)) (/ (* (sin t) eh) ew))) (* (/ -1 (cos t)) (/ (* (sin t) eh) ew)) (/ -1 (cos t)) (cos t) t (/ (* (sin t) eh) ew) (* (sin t) eh) (sin t) ew (* (* (cos t) ew) (cos (atan (* (/ -1 (cos t)) (/ (* (sin t) eh) ew))))) (* (cos t) ew) (cos (atan (* (/ -1 (cos t)) (/ (* (sin t) eh) ew)))) (atan (* (/ -1 (cos t)) (/ (* (sin t) eh) ew))) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (tan t) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (tan t) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2)))) (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) (tan t) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (tan t) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2))) (* eh (sin t)) (/ (* (* -1 eh) (/ (tan t) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2)) (* (* -1 eh) (/ (tan t) ew)) (/ (tan t) ew) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2) (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew))) 1/2 (fabs (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos t) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (sin (atan (/ (* (neg eh) (tan t)) ew))) (fabs (- (/ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))) (/ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))) (- (/ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))) (/ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))))) (/ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (cos (atan (* (* -1 eh) (/ (tan t) ew)))) (atan (* (* -1 eh) (/ (tan t) ew))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) (asinh (* (* -1 eh) (/ (tan t) ew))) (/ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))) (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (fabs (- (/ (* (pow (* (cos t) ew) 3) (pow (cos (atan (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))) (/ (* (pow (* (sin t) eh) 3) (pow (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))))) (- (/ (* (pow (* (cos t) ew) 3) (pow (cos (atan (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))) (/ (* (pow (* (sin t) eh) 3) (pow (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))))))) (/ (* (pow (* (cos t) ew) 3) (pow (cos (atan (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))) (* (pow (* (cos t) ew) 3) (pow (cos (atan (* (* -1 eh) (/ (tan t) ew)))) 3)) (pow (* (cos t) ew) 3) 3 (pow (cos (atan (* (* -1 eh) (/ (tan t) ew)))) 3) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (/ (* (pow (* (sin t) eh) 3) (pow (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))) (* (pow (* (sin t) eh) 3) (pow (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) 3)) (pow (* (sin t) eh) 3) (pow (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) 3))
1.6s
ew
@0
((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (tan t) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (tan t) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2)))) (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (cos t)) ew (cos t) t t (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) eh (tan t) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (tan t) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2))) (* eh (sin t)) (sin t) (/ (* (* -1 eh) (/ (tan t) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2)) (* (* -1 eh) (/ (tan t) ew)) (* -1 eh) -1 (/ (tan t) ew) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2) (/ (+ (* 1/2 (/ (* (* ew ew) (cos t)) (* eh (sin t)))) (/ (* eh (sin t)) (cos t))) ew) (+ (* 1/2 (/ (* (* ew ew) (cos t)) (* eh (sin t)))) (/ (* eh (sin t)) (cos t))) 1/2 (/ (* (* ew ew) (cos t)) (* eh (sin t))) (* (* ew ew) (cos t)) (* ew ew) (cos t) (/ (* eh (sin t)) (cos t)) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2)))) (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (cos t)) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2))) (/ (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2)) (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (* -1 (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) (pow (+ 1 (* (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2) (+ 1 (* (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1 (* (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (* (* -1 eh) (/ (tan t) ew))) (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (/ (/ (sin t) (cos t)) ew) (/ (sin t) (cos t)) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2)))) (* (* eh (sin t)) (/ (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2))) (/ (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (pow (+ 1 (* (* (* -1 eh) (/ (tan t) ew)) (* (* -1 eh) (/ (tan t) ew)))) 1/2)) (* (* -1 eh) (/ (/ (sin t) (cos t)) ew)) (/ (/ (sin t) (cos t)) ew) (/ (sin t) (* ew (cos t))) (fabs (- (/ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))) (/ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))) (- (/ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))) (/ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))))) (/ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (* (* ew ew) (* (exp (* (log (cos t)) 2)) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* (exp (* (log (cos t)) 2)) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (exp (* (log (cos t)) 2)) (* (log (cos t)) 2) (log (cos t)) 2 (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ (* eh (sin t)) (* ew (cos t))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))) (atan (* (* -1 eh) (/ (tan t) ew))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) (asinh (* (* -1 eh) (/ (tan t) ew))) (/ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))) (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (fabs (- (/ (* (* (pow (cos t) 3) (* (* ew ew) ew)) (pow (cos (atan (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))) (/ (* (pow (* (sin t) eh) 3) (pow (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))))) (- (/ (* (* (pow (cos t) 3) (* (* ew ew) ew)) (pow (cos (atan (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))) (/ (* (pow (* (sin t) eh) 3) (pow (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))))))) (/ (* (* (pow (cos t) 3) (* (* ew ew) ew)) (pow (cos (atan (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))) (* (* (pow (cos t) 3) (* (* ew ew) ew)) (pow (cos (atan (* (* -1 eh) (/ (tan t) ew)))) 3)) (* (pow (cos t) 3) (* (* ew ew) ew)) (pow (cos t) 3) 3 (* (* ew ew) ew) (pow (cos (atan (* (* -1 eh) (/ (tan t) ew)))) 3) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (/ (* (pow (* (sin t) eh) 3) (pow (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) 3)) (+ (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew)))))) (+ (* (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))))) (* (* (* (cos t) ew) (cos (atan (* (* -1 eh) (/ (tan t) ew))))) (* (* (sin t) eh) (tanh (asinh (* (* -1 eh) (/ (tan t) ew))))))))) (* (pow (* (sin t) eh) 3) (pow (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) 3)) (pow (* (sin t) eh) 3) (pow (tanh (asinh (* (* -1 eh) (/ (tan t) ew)))) 3))

rewrite1.3min (9.8%)

Memory
2 888.4MiB live, 101 333.8MiB allocated; 19.4s collecting garbage
Stop Event
411×iter limit
167×node limit
11×unsound
1×saturated
Counts
76 419 → 100 341

eval1.2min (8.7%)

Memory
569.3MiB live, 97 779.1MiB allocated; 29.4s collecting garbage
Compiler

Compiled 64 141 030 to 1 205 515 computations (98.1% saved)

explain21.7s (2.6%)

Memory
-205.7MiB live, 27 927.8MiB allocated; 6.0s collecting garbage
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64#fsensitivity19493
+.f64#fcancellation170231
sin.f64#fsensitivity16830
sqrt.f64#foflow-rescue14160
-.f64#fcancellation94311
-.f64#fnan-rescue6860
log.f64#fsensitivity5901
/.f64#fo/n5020
/.f64#fo/o3900
/.f64#fu/u2790
*.f64#fn*o2470
/.f64#fu/n1830
sqrt.f64#fuflow-rescue1790
exp.f64#fsensitivity16527
/.f64#fn/o1160
cbrt.f64#foflow-rescue860
*.f64#fn*u660
*.f64#fo*u430
cbrt.f64#fuflow-rescue390
/.f64#fn/u360
*.f64#fu*o300
acos.f64(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))sensitivity212
pow.f64#fsensitivity103
log.f64#foflow-rescue100
pow.f64#fuflow-rescue80
Confusion
Predicted +Predicted -
+579260
-13666094
Precision
0.8091645711092484
Recall
0.9897470950102529
Confusion?
Predicted +Predicted MaybePredicted -
+57923525
-1366326062
Precision?
0.8065051903114187
Recall?
0.995727956254272
Freqs
test
numberfreq
06154
14720
21586
3349
4243
5144
679
726
88
92
101
Total Confusion?
Predicted +Predicted MaybePredicted -
+4200
-325
Precision?
0.8936170212765957
Recall?
1.0
Samples
4.0s7 820×1valid
2.3s16 484×0valid
1.9s2 018×2valid
635.0ms300×3valid
10.0ms2×4valid
Compiler

Compiled 19 935 to 2 551 computations (87.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 7.1s
ival-sin: 1.1s (15.4% of total)
ival-mult: 1.0s (14.7% of total)
ival-cos: 859.0ms (12.1% of total)
adjust: 705.0ms (9.9% of total)
ival-div: 490.0ms (6.9% of total)
ival-pow2: 419.0ms (5.9% of total)
ival-add: 393.0ms (5.5% of total)
ival-cosu: 381.0ms (5.4% of total)
ival-sinu: 380.0ms (5.3% of total)
ival-sub: 262.0ms (3.7% of total)
ival-log: 236.0ms (3.3% of total)
ival-exp: 228.0ms (3.2% of total)
ival-sqrt: 152.0ms (2.1% of total)
ival-neg: 76.0ms (1.1% of total)
ival-tan: 67.0ms (0.9% of total)
ival-atan2: 65.0ms (0.9% of total)
ival-hypot: 39.0ms (0.5% of total)
ival-acos: 32.0ms (0.5% of total)
ival-pow: 30.0ms (0.4% of total)
ival-atan: 29.0ms (0.4% of total)
ival-true: 25.0ms (0.4% of total)
ival-pi: 24.0ms (0.3% of total)
exact: 20.0ms (0.3% of total)
ival-cbrt: 19.0ms (0.3% of total)
ival-assert: 13.0ms (0.2% of total)
ival-fabs: 12.0ms (0.2% of total)
ival-asin: 7.0ms (0.1% of total)
ival-log1p: 5.0ms (0.1% of total)

analyze18.5s (2.2%)

Memory
-148.6MiB live, 21 033.7MiB allocated; 6.9s collecting garbage
Algorithm
53×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%79.4%20.6%0%0%0%0
17.2%13.7%65.7%20.6%0%0%0%1
25%19.6%58.5%20.6%0%1.3%0%2
35.2%26.6%48.9%20.6%0%3.8%0%3
42.3%31.7%43.1%20.6%0%4.5%0%4
47.9%35.6%38.7%20.6%0%5.1%0%5
51%37.6%36.1%20.6%0%5.7%0%6
54.4%39.7%33.2%20.6%0%6.5%0%7
56.2%40.7%31.8%20.6%0%6.8%0%8
59%42.5%29.5%20.6%0%7.4%0%9
60.3%43.2%28.4%20.6%0%7.7%0%10
62.1%44.3%27%20.6%0%8.1%0%11
63.6%45.1%25.8%20.6%0%8.5%0%12
Compiler

Compiled 1 826 to 963 computations (47.3% saved)

preprocess15.9s (1.9%)

Memory
-290.7MiB live, 18 489.0MiB allocated; 4.4s collecting garbage
Stop Event
104×iter limit
92×node limit
12×saturated
Compiler

Compiled 203 633 to 30 289 computations (85.1% saved)

regimes10.3s (1.3%)

Memory
-31.9MiB live, 14 489.8MiB allocated; 2.5s collecting garbage
Counts
4 183 → 428
Calls

155 calls:

642.0ms
a
527.0ms
b
461.0ms
lambda2
384.0ms
phi1
380.0ms
phi2
Compiler

Compiled 14 051 to 10 542 computations (25% saved)

derivations8.1s (1%)

Memory
-306.3MiB live, 7 128.5MiB allocated; 1.8s collecting garbage
Stop Event
27×fuel
25×done
Compiler

Compiled 47 343 to 5 663 computations (88% saved)

bsearch5.6s (0.7%)

Memory
153.8MiB live, 6 444.4MiB allocated; 806ms collecting garbage
Algorithm
123×binary-search
39×left-value
Stop Event
119×narrow-enough
4×predicate-same
Samples
2.3s3 074×1valid
1.3s7 342×0valid
253.0ms330×2valid
193.0ms1 402×0invalid
87.0ms38×3valid
44.0ms151×1invalid
15.0ms35×2invalid
1.0ms22×0exit
Compiler

Compiled 237 068 to 87 974 computations (62.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 3.7s
ival-mult: 529.0ms (14.3% of total)
ival-cos: 480.0ms (13% of total)
ival-sin: 454.0ms (12.3% of total)
adjust: 409.0ms (11.1% of total)
ival-pow2: 347.0ms (9.4% of total)
ival-div: 300.0ms (8.1% of total)
ival-cosu: 241.0ms (6.5% of total)
ival-sinu: 209.0ms (5.7% of total)
ival-sub: 205.0ms (5.5% of total)
ival-sqrt: 164.0ms (4.4% of total)
ival-add: 151.0ms (4.1% of total)
ival-atan2: 90.0ms (2.4% of total)
ival-neg: 39.0ms (1.1% of total)
ival-hypot: 14.0ms (0.4% of total)
ival-cbrt: 11.0ms (0.3% of total)
exact: 11.0ms (0.3% of total)
ival-atan: 10.0ms (0.3% of total)
ival-true: 10.0ms (0.3% of total)
ival-exp: 7.0ms (0.2% of total)
ival-assert: 6.0ms (0.2% of total)
ival-tan: 5.0ms (0.1% of total)
ival-pi: 3.0ms (0.1% of total)
ival-pow: 2.0ms (0.1% of total)
ival-fabs: 1.0ms (0% of total)

simplify3.1s (0.4%)

Memory
-226.7MiB live, 3 076.5MiB allocated; 447ms collecting garbage
Stop Event
51×node limit
1×saturated

start4.0ms (0%)

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

end0.0ms (0%)

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

Profiling

Loading profile data...